以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助 在窗口1打开窗口2后Click "Button1"  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102013)

--  作者:jackyfashion
--  发布时间:2017/6/11 23:44:00
--  求助 在窗口1打开窗口2后Click "Button1"
老师:
您好!
下面的代码,Click不了窗口2 的"Button1"
窗口1 有个Button, Button  的    Click  代码如下:
Forms("窗口2").Open
If Forms("窗口2").Opened
    Dim bt As WinForm.Button = Forms("窗口2").Controls("Button1")
   bt.PerformClick()
End If
请老师指教!
谢谢!!!

--  作者:有点蓝
--  发布时间:2017/6/12 8:47:00
--  
窗口2不能是模式窗口,可以在窗口2Afterload事件写:

Dim bt As WinForm.Button = e.Form.Controls("Button1")
   bt.PerformClick()

--  作者:jackyfashion
--  发布时间:2017/6/12 21:32:00
--  
谢谢老师!!!