以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何遍历label控件,将不必要的删除  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=188569)

--  作者:zhangjian222200
--  发布时间:2023/9/27 20:47:00
--  如何遍历label控件,将不必要的删除
实际测试,下面代码,执行正常
For Each frm As WinForm.Form In Forms
    If frm.Opened AndAlso frm.Name.StartsWith("tingKao") = True Then
        frm.Close()
    End If
Next

能将上面代码,改成遍历label控件么?
希望遍历,使用代码RemoveControl(name)动态删除控件

--  作者:zhangjian222200
--  发布时间:2023/9/27 21:17:00
--  
论坛上搜索,找到一部分参考,加上帮助,下述代码实现了
\'遍历窗口控件,将不必要的,都删除
For Each c As Winform.Control In Forms("chaKan").Controls
    If c.Name.StartsWith("chaKanLe") Then
        Forms("chaKan").RemoveControl(c.Name)
    End If
Next