怎样在form2 中给form1上的textbox赋值

时间:2022-07-09 00:58:24
在form1 中的button 调用显示了form2,怎样在form2中把一个字符值赋给form1上的textbox

12 个解决方案

#1


在form1中定义一个
Dim WithEvents mform2 As Form2
点击butten时使用mform2
mform2.show(me)

在form2中向form1传值时就使用
raiseevent Got一个字符

然后在form1中写mform2的 Got一个字符 事件即在这里面为textbox赋值

#2


Form1在调用Form2时,
Dim f As New Form2
f.Owner = Me
f.Show

在Form2中,给Form1可以这样操作了,
dim mForm1 As Form1 =Ctype(Me.Owner, Form1)
mForm1.TextBox1.Text="aaa"

#3


mform2.show(me) 中的 me 什么意思?

还有别的方法吗,在form2中执行,如VB6中那样简单from1.textbox.text="aaa"

#4


用一个静态变量就OK
首先把form2中的字符串赋值为静态变量
然后把静态变量的传给form1上的textbox

#5


在form1按扭单击事件中:
dim a as string
a=from2.textbox1.text
me.textbox1.text=a

#6


wojila() 兄弟,是在form2中返回字符呀

#7


还有别的办法吗,请大哥们指点

#8


添加一个Module
定义一个pulbic属性的字符,这样就可以在form1和form2之间随意调用.

#9


是不是在form2关闭的时候把一个字符值赋给form1上的textbox

#10


我的习惯是不要用太多的全局变量。

所以虽然我的方法麻烦一些,但是还是不错的。利用事件返回值

show(me)中的me指的是当前打开的窗体位于哪个窗体的上面,用me的话就是你点的按钮所有的窗体

#11


你点的按钮所在的窗体

#12


2005下不用这么折腾吧.

#1


在form1中定义一个
Dim WithEvents mform2 As Form2
点击butten时使用mform2
mform2.show(me)

在form2中向form1传值时就使用
raiseevent Got一个字符

然后在form1中写mform2的 Got一个字符 事件即在这里面为textbox赋值

#2


Form1在调用Form2时,
Dim f As New Form2
f.Owner = Me
f.Show

在Form2中,给Form1可以这样操作了,
dim mForm1 As Form1 =Ctype(Me.Owner, Form1)
mForm1.TextBox1.Text="aaa"

#3


mform2.show(me) 中的 me 什么意思?

还有别的方法吗,在form2中执行,如VB6中那样简单from1.textbox.text="aaa"

#4


用一个静态变量就OK
首先把form2中的字符串赋值为静态变量
然后把静态变量的传给form1上的textbox

#5


在form1按扭单击事件中:
dim a as string
a=from2.textbox1.text
me.textbox1.text=a

#6


wojila() 兄弟,是在form2中返回字符呀

#7


还有别的办法吗,请大哥们指点

#8


添加一个Module
定义一个pulbic属性的字符,这样就可以在form1和form2之间随意调用.

#9


是不是在form2关闭的时候把一个字符值赋给form1上的textbox

#10


我的习惯是不要用太多的全局变量。

所以虽然我的方法麻烦一些,但是还是不错的。利用事件返回值

show(me)中的me指的是当前打开的窗体位于哪个窗体的上面,用me的话就是你点的按钮所有的窗体

#11


你点的按钮所在的窗体

#12


2005下不用这么折腾吧.