用读写数据的方法
比方说：
Private Sub form_load()
'这里别忘在属性栏里设置Text1.MultiLine = True
Text1.Text = ""
Dim a As String
Open "h:\test.txt" For Input As #1
Do Until EOF(1)
Line Input #1, a
Text1.Text = Text1.Text & a & vbCrLf
Loop
Close #1
End Sub
我试过了··可以的··
你在form load事件中加上读取文件的代码就可用了啊。
然后赋值给文本框就好了
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024