我连做梦都在想,可是还是想不通啊。各位一定要帮忙啊!!!!!

来源:百度知道 编辑:UC知道 时间:2024/05/31 09:00:37
由于要一次输入多组数据,因为我建了一个窗体,用Text控件做为输入框,并建命按钮,设置单击返回输入后的text属性值。但是当我在另一窗体程序中调用输入数据时,却只调出了text属性的初始值(我设定初始不为零),程序直接跳过了命令按钮,输入的数据成了第二次的初始值,在第二次执行了。并没有把我在另一个窗的输入TEXT新的数据内容载入第一窗口的程序运行。我该怎么处理这个问题呢,帮帮我啊,我 实在想不到解决的方法诶!!!!!!!!!!!11
我在FORM1中编辑 form2.show form2中有一个文本框(初始值为 20)和命令按扭 我要调用的是命令按扭单击后的文本框里的内容代码如下
form1中
private sub form_click()
form2.show
text1.text=form2.text1.text
end sub
form2中
private sub form_load()
form2.show
end sub
private sub commmond1_click()
.....
end sub
我发现执行程序后 FORM1中输出的是20 是FORM2中文本框的初始值
我经过调试后发现 在FORM1 程序执行调用时执行了我FORM2中LOAD事件后即调用了初始值到FORM1的程序中,继续了FORM1程序到最后,并没有调用我单击确认后文本框的数据.也就是说,我FORM2中的单击事件被FORM1中的程序个忽略了,并没有执行.我现在自己都被搞晕了,把代码移来移去就是不行.
我就是想FORM1的程序中能够调用到我FORM2单击后文本框的数据,就是这样,可是我做不到帮帮忙啊

把form2.show 改为form2.show 1 就可以了,这样在form2.unload之前不会返回form2中的值,也不会执行form2.show 1语句下面的语句,注意在commmond1_click中加上unload me

'form1和form2各放一个文本框,form2中一个按钮
'form1中:
private sub form_click()
form2.show
end sub

'form2中:
private sub commmand1_click()
form1.text1=form2.text1
end sub

我明白楼主的意思了,楼上的,哪用定义变量啊,楼主,看我的,这代码就是你想要的效果了。
在form1中,新建Command1,text1。
在form2中,新建text1。
代码如下:
Private Sub Command1_Click()
Form2.Text1.Text = Form1.Text1.Text''''''这个按扭是让你的form2的text等于你在form1输入的值
End Sub
Private Sub Form_Load()
Form2.Show
End Sub
既简单有方便,哪用搞什么定义变量呢~~~~

简单来说,思路这样:
1.建立程序级变量;
2.在窗体1改变text的内容的时候将值附给程序级变量;
3.在窗体2读取的时候将程序级变量的值附给窗体2中的text.

具体的譬如可以这样做:
1.在公共模块中定义变量,如:
public x

2.窗体1的按钮,如:
Private Sub Command1_Click()
x = Text1.Text
End Sub

3.窗体2读取的时候,如:
Private Sub Form_Load(