.


:




:

































 

 

 

 





 

1.

:

 

Input #_; <_>

 

, .

19.32.

 

Open "FILE" For Input As #1 Do While Not EOF(l) Input # 1; MyString; MyNumber Debug.Print MyString; MyNumber Loop Close #1

 

 

Line Input #_; <>

 

" " (Chr(13)) .

19.33.

 

Open "TESTFILE" For Input As #1 Do While Not EOF(l) Line Input #1, TextLine Debug.Print TextLine Loop Close #1 , Debug

 

2.

:

 

Get Put [#_; [#],<>

19.34.

 





:


: 2015-01-29; !; : 867 |


:

:

, , 1:10
==> ...

1647 - | 1571 -


© 2015-2024 lektsii.org - -

: 0.012 .