24小时热门版块排行榜    

CyRhmU.jpeg
查看: 289  |  回复: 1

萤火虫8876

铁杆木虫 (正式写手)


[交流] 【求助】VB程序的读写

为了计算方便,最近写了一个程序,本人初学vb,希望给位高手帮忙写一下,不盛感激!

要求
在一个form窗口有几十个text文本框,目的想将这几十个text个文本框的数据存储到一个txt文档,且在需要的时候将这保存在txt文档的数据调用出后输入到这几十个text文本框中。
回复此楼

» 猜你喜欢

» 抢金币啦!回帖就可以得到:

查看全部散金贴

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sjh717142

新虫 (初入文坛)


★ ★ ★
萤火虫8876(金币+30): 2011-03-15 10:15:29
余泽成(金币+3): 谢谢参与应助,欢迎常来程序语言版! 2011-03-20 16:36:14
文本框用文本框控件数组

Private Sub Command1_Click() '写文件
Dim i As Integer
Open App.Path & "\a.txt" For Output As #1
For i = 0 To 3
    Print #1, Text1(i).Text
Next i
Close #1
End Sub

Private Sub Command2_Click() '读文件
Dim i As Integer, strRead As String
Open App.Path & "\a.txt" For Input As #1
For i = 0 To 3
    Line Input #1, strRead
    Text1(i).Text = strRead
Next i
Close #1
End Sub
2楼2011-03-14 20:25:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 萤火虫8876 的主题更新
普通表情 高级回复(可上传附件)
信息提示
请填处理意见