以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何判断窗口中 一个 控件是否存在  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=102309)

--  作者:zhsenchzhi
--  发布时间:2017/6/17 1:18:00
--  如何判断窗口中 一个 控件是否存在
想判断一个窗口中 一个 控件是否存在,代码如下

  Dim btn As WinForm.Button
        
        Try
            btn = Forms("dfafd").Controls("ButtonUpdate2222222222")
        Catch ex As Exception
            btn = Nothing
        End Try  

由于  Forms("dfafd").Controls  没有 contains 这样的方法 来判断 控件是否存在, 所以只好用 try  catch  这样的语句

目的是想让 程序 不报  控件不存在这样的错误

但是 用了 try catch  之后,仍然报错,请问这是怎么回事, 为什么用了 try catch  还报错呢?  报错如下:


图片点击可在新窗口打开查看此主题相关图片如下:f.png
图片点击可在新窗口打开查看
     
[此贴子已经被作者于2017/6/17 1:18:49编辑过]

--  作者:有点蓝
--  发布时间:2017/6/17 9:06:00
--  
Contains方法的

if Forms("dfafd").Controls.Contains("ButtonUpdate2222222222") then