1. ????????????? Open

1
????????? ?? ??? ??????? ????
2
1. ????????????? Open

• Open pathname For mode As filenumber
• pathname- ???? ? ????? ?? ?????
• mode- ? ????? ????? ?? ?? ???????? ????? (Input-
  ????????, Output- ?????????)
• filenumber- ????? ?? ????? (1 ?? 255)

3
2. ?????? ?? ???????? ?? ??????? ????

• ??????????? VB6.0
• ???????? ?????????? MS Common Dialog Control6.0
• ????????? ???????? ???? (TextBox), ???????? ?????
  (CommandButton) ? ?????? ?????????? ????????
  ???????? (CommonDialog) ????? ???????

4
3. ????????? ?? ????????

• ?? ?????????? ????
• Enabled false
• Multiline- true
• Text (??????)
• ?? ?????????? ?????
• Caption- Save Text File

5
4. ????????? ?? ????

• ???????? ???????? ???
• Private Sub Command1_Click()
• CommonDialog1.ShowSave
• Open CommonDialog1.FileName For Output As 1
• Print 1, Text1.Text
• Close 1
• End Sub

6
5. ??????????? ??????????

• ???????????? ????
• ?????????? ????????