#1大概是指文本在Open程序中对应的编号
Input是把Data从文本Load到VB
Output就是相反的功用
Open之后也要对应一个Close #1~而要做的事就写在中间~
否则下次要用到时就会出现档案已开启的讯息~
也可能是你之前用过这编号了~却没Free掉~导致资源被占据~
所以建议编号不要写死~用变量取代~用完要关掉~
例如:
Private Sub Form_Load()
Dim FileNum As Integer, TempString As String
FileNum = FreeFile
Open "D:\ptarp.conf" For Input As #FileNum
Do While Not EOF(FileNum)
Line Input #FileNum, TempString '一次读一行到TempString
Text1.Text = Text1.Text & TempString & vbCrLf
Loop
Close #FileNum
End Sub