耗材质量保证协议书:如何利用VB实现这个功能?

来源:百度文库 编辑:神马品牌网 时间:2024/04/19 16:49:32
我有一个TXT文件,内容如下:
1,我需要更多的时间
I need more time
2,我需要更多的朋友
I need more friends
我想把这四行内容赋值到四个文本框内,如何编程?

顺序文件:
Dim strTemp As String
Dim iLine As Integer
Open "testFile.dat" For Input As #1 '打开文件
iLine = 1
Do While Not EOF(1) And iLine <= 3 '循环读取一行数据
Line Input #1, strTemp '读入一行数据
iLine = iLine + 1
Loop
Close #1 '关闭文件
直到iLine=3,strTemp应该只包含第三行。
我没有试验,只是找的网上的,有问题在讨论,可以加我好友。

text1.text="1,我需要更多的时间"
text2.text="I need more time"
text3.text="2,我需要更多的朋友"
text4.text="I need more friends"

在编程中,将这些值赋给text属性就是了

晕...这个也算问题?