Foxtable(狐表)用户栏目专家坐堂 → 相同代码,反应不一,没找出原因。


  共有1932人关注过本帖树形打印复制链接

主题:相同代码,反应不一,没找出原因。

帅哥哟,离线,有人找我吗?
石四
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
相同代码,反应不一,没找出原因。  发帖心情 Post By:2016/6/17 9:29:00 [只看该作者]

With Forms("公告通知")
            .Open()
            .Controls("Label1").Text = 9
        End With
        Dim btn As WinForm.Button = Forms("公告通知").Controls("Button1")
        btn.PerformClick()

 

这段代码能执行!

 

With Forms("费用管理")
            .Open()
            .Controls("Label31").Text = 9
        End With
        Dim btn As WinForm.Button = Forms("费用管理").Controls("Button3")
        btn.PerformClick()

 

这段只能打开窗口,但调用不了其中的label和button控件,

关闭窗口后,有错误提示:

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图00.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图22.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/17 9:32:00 [只看该作者]

你的这个窗口 Forms("费用管理") 是模式窗口,不能是模式窗口,你改成独立

 回到顶部
帅哥哟,离线,有人找我吗?
石四
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:972 积分:7048 威望:0 精华:0 注册:2013/3/31 10:33:00
  发帖心情 Post By:2016/6/17 9:41:00 [只看该作者]

哦,明白

 


 回到顶部