vb顺序文件读操作?
vb顺序文件读操作?
日期:2009-01-13 20:04:13 人气:1
Option Explicit
Private Sub Command1_Click()
Dim MyString$
Open App.Path & "\Help.txt" For Input As #1 ' 打开输入文件。
Text1.Text = StrConv(InputB(LOF(1), #1), vbUnicode)
Close #1 ' 关闭文件。
End Sub