如何在两个窗口之间传递数据

[liushiying]

如何在两个窗口之间传递数据

既是：在窗口“FORM2”点一个“Button2”（确定）按扭，将窗口“FORM2”中的“TextBox1”中的字符写到窗口“FORM1”中的“TextBox2”里

[Calmbear]

可以。。

[jimoforever]

关注中，我一直没做出来这个功能

[chinasoft2000]

在BUTTON2的CLICK中写：
dim form1 as new form1()
form1.textbox2.text=me.textbox1.text
form1.show()

[jimoforever]

chinasoft这样写是不行的

[ok1]

dim Frm as new form1

public sub new(byval F1 as form1)
frm=f1
....
end sub

private sub Button2_click(.....)
me.textbox1.text=frm.textbox2.text
end sub

[wj2000net]

将form1 public
nimen too cale

[liushiying]

在BUTTON2的CLICK中写：
dim form1 as new form1()
form1.textbox2.text=me.textbox1.text
form1.show()

在BUTTON2的CLICK中事件之前“form1”窗口已经打开了
不重新打开“form1”如何实践

[chinasoft2000]

我这样写为什么不行？？
在BUTTON2的CLICK中写：
dim form1 as new form1()
form1.textbox2.text=me.textbox1.text
form1.show()

然后刷新一下FORM1就可以了。

[lilei01]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim form1 As New Form1()
Dim ft As String
ft = TextBox1.Text
form1.Show()
form1.TextBox2.Text = ft
End Sub
我试过了,应当可以的,将启动窗体设置为FORM2

[wj2000net]

是的应用sub main ()启动唯一的办法

[isage2002]

将窗体对象设置成为全局变量，才能在两个窗口之间互相调用

[zhangxiushu]

使用DDE吧

[pigpag]

全局指针。
在模块中这样定义
Public ptForm1 As Form

然后在
Dim xx As New Form1()
后面紧接着写
ptForm1=xx

以后就可以用ptForm1引用唯一的实例。

楼上form1 public是没有用的。

[wj2000net]

form1 public 放到模块中这样定义，楼上太笨

[wj2000net]

pigpag(噼里啪啦) 虽然能实现但根本不懂技术内幕

原文；
Public ptForm1 As Form
Dim xx As New Form1()
后面紧接着写
ptForm1=xx

订正：

在栈上多分配了一次内存，将ptForm1指向xx

[nightsuntang]

modual 中的数据成员在别的窗体中好象不能赋植啊。
只能用modual里定义的sub main ()来赋值？

[sweet12345]

使用modle ,结合使用全局变量，比如说在mudule中设置public ss as string,用这个变量作中介，在不同的窗体之间传递值就可以了
“FORM2”点一个“Button2“执行ss=textbox2.text

在load form1的时候再将这个值赋给“FORM1”中的“TextBox2”。textbox2.text=ss

[sweet12345]

更正一点，我自己试过了，除了我上面的方法外， chinasoft2000得方法也是可行的，我最开始也使用了那种方法，只是忘记了把启动的对象设置为sub main()，所以结果不正确，我还以为不行呢。

[KiteMail]

我觉得定义窗体不如定义变量！
设置一个公共变量，在加上属性完全可以解决！