VB 怎样读取文本文件的数字到文本框1,2,3,4?
例如读取文本文件test.txt的 引号 内的内容分别到文本框1,2,3,4
文本文件内容如下:
"aaa ", "23 ", "36 ", "45[ "
[解决办法]
读取引号的位置,然后分别MID截取。
[解决办法]
split(str, ", ")
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
最新版本:20070127
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
[解决办法]
假如你的文本文件放C盘根目录,且文件名为ttt.txt
Option Explicit
Dim str(4) As String
Private Sub Command1_Click()
Text1 = " "
Open "c:\ttt.txt " For Input As #1
Input #1, str(0), str(1), str(2), str(3)
Close #1
Text1 = str(0)
Text2 = str(1)
Text3 = str(2)
Text4 = str(3)
End Sub