Foxtable(狐表)用户栏目专家坐堂 → 额,老师,这个要怎么表达。


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

主题:额,老师,这个要怎么表达。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/25 14:49:00 [显示全部帖子]

For Each c As WinForm.Control In e.Form.controls
    If typeof c Is winform.button Then
       
    End If
Next

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/29 14:11:00 [显示全部帖子]

以下是引用rxfmrqq在2017/12/29 13:59:00的发言:

For Each c As WinForm.Control In e.Form.controls
    If typeof c Is winform.button Then
        e.from.RemoveControl(c)
    End If
Next

老师, 这个不理解。

 

是一种语法,判断 c 变量是不是某种类型。

 

或者你可以这样写 msgbox(c.gettype.name)


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/12/29 15:04:00 [显示全部帖子]

Dim ns As New List(Of String)

For Each c As WinForm.Control In e.Form.controls
    If typeof c Is winform.button Then
        ns.Add(c.name)
    End If
Next

For Each n As String in ns

    e.from.RemoveControl(n)

Next

 

 


 回到顶部