3. Image . PictureBox, . , . Image , PictureBox. Stretch ( .) Picture ( , .).
Image1.Picture = LoadPicture("C:\Windows\.BMP")
4. , . .
5. , , .
- . . : , Enter () . . , .
6. , , .
. . . , .
7. , , .
. , , , . .
8. :
FileCopy Source, dest (source , dest , .)
Kill {} ({} )
MkDir PatchName (PatchName )
RmDir PatchName (PatchName )
ChDir PatchName (PatchName )
Name oldname as newname (oldname , newname )
9. : , Enter () . . . . , .
|
|
10. Open.
Open For { }[Access{}]
[Lock{}] As [#] N [Len=]
, , , , . : R:/labs/11/s.txt For . : Input , ; Output , ; Append - , ; , , FreeFile. FreeFile .
Open R:\Test.txt For Input As #1
// Test.txt
11. Print # Write #.
Print , , , , . Write #. Close. : Close [# < > ] Close . Close . c Close Reset. , Close, .
Print#1, A, B,
Close #1