VB 如何读取text数据到textbox

来源:百度知道 编辑:UC知道 时间:2024/06/06 03:05:28
我使用一个command按纽为读取数据,通过代码读取text数据到textbox中,总共有十九个textbox控件,分布在两个窗体内,第一个窗体从text1(0)到text1(9),第二个窗体从text1(0)到text1(8),怎么样编代码呀,谢谢各位帮我解答一下
按照你所说的不对哦,我没有学过VB,麻烦能不能说详细一点
我需要从text文本文件里读取数据,这两个代码都实现不了哦
还是没明白我的意思,我的意思是,我有一个读取数据按纽,我点击它之后,会弹出一个打开文件的对话框,选择一个text文本文件,该文件里的数据就按行填充在十九个textbox控件框中

private sub command1_click()
dim a as string
commondialog1.filename=""
commondialog1.filter="*.txt|*.txt"
commondialog1.showopen
a=commondialog1.filename
open a as input #1
do while eof(#1)
tezt1.text=line input #1
text2.text=line input #1
......
loop
end sub

要用全局public定义两个窗体的变量,在form1里面添加如下定义
public a,b,c..... as single'定义十个变量
private sub command1_click()
a=text1(0).text
b=text1(1).text
.
.
'将十个变量赋值
end sub
在form2里面添加如下定义
public aa,bb,cc..... as single'定义十个变量
private sub command1_click()
a=text1(0).text
b=text1(1).text
.
.
'将十个变量赋值
end sub
两个窗体内的变量不能相同。
此时就可以随意调用变量了
不过调用时要加上form1.
比如在form1里调用form2的数就用
aa=form2.aa

Private Sub Command1_Click()
for i = 0 to 8
Text1.Text = Form2.Text1(i).Text
Text1.Text = Form3.Text1(i).Text
ne