
vb里读取任意一个txt文件的内容保存到x的变量当中的代码
展开全部
Open App.Path + "\1.txt" For Input As #1
Do While Not EOF(1)
Dim tmp,As String
Line Input #1, tmp
' InStr(1, tmp, "key")在这里找有没有变量的关键字,不然谁知道什么变量什么类型?
Doevents
Loop
Close #1
Do While Not EOF(1)
Dim tmp,As String
Line Input #1, tmp
' InStr(1, tmp, "key")在这里找有没有变量的关键字,不然谁知道什么变量什么类型?
Doevents
Loop
Close #1
追问
要用什么控件啊
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询