7451
社区成员
- 主页
请先进来看看
在Form1的Command1_Click中调用Form2.Show后，在Form2的Command2_Click中获得Form2的Text1.Text和Text2.Text，并将Text1.Text和Text2.Text的值转移到Form1的Command1_Click中处理，该如何实现？也就是在调用Form2.Show并得到Text1.Text和Text2.Text后，如何让Command2_Click过程中Form2.Show后面的代码继续执行下去。
...全文
请发表友善的回复…
发表回复
KiteMail 2003-12-12
建立一模块！
>------------------------------
Type TT
Text1 As String
Text2 As String
End Type
Public fm As TT
------------------------------<
form1中的command1_click()
>------------------------------
Form2.Show vbModal
Debug.Print fm.Text1 & fm.Text2
------------------------------<
form2中的command1_click()
>------------------------------
fm.Text1 = Me.Text1.Text
fm.Text2 = Me.Text2.Text
Unload Me
------------------------------<
不知道你要的是不是这样的结果！
如有什么问题可发信息给我！
:)
>------------------------------
Type TT
Text1 As String
Text2 As String
End Type
Public fm As TT
------------------------------<
form1中的command1_click()
>------------------------------
Form2.Show vbModal
Debug.Print fm.Text1 & fm.Text2
------------------------------<
form2中的command1_click()
>------------------------------
fm.Text1 = Me.Text1.Text
fm.Text2 = Me.Text2.Text
Unload Me
------------------------------<
不知道你要的是不是这样的结果！
如有什么问题可发信息给我！
:)
EdmondWang 2003-12-12
public x
public y
public function xy()
end function
写一个公用函数看看吧！
windcoming 2003-12-12
自已先顶
windcoming 2003-12-12
Form2能不能不用模式窗体打开，我要用的是非模式窗体。
另外用SetWindowPos hwnd, -1, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE显示的窗体上再显示模式窗体，是否会出现问题，或者会不稳定。
另外用SetWindowPos hwnd, -1, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE显示的窗体上再显示模式窗体，是否会出现问题，或者会不稳定。