VB.NET 循环窗体内所有控件

本文主要是介绍VB.NET 循环窗体内所有控件，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

    Private Sub 清理并初始化控件()For Each 控件 As Control In Me.Controls            '循环当前窗口的所有控件'清理所有ComboBox控件If TypeOf 控件 Is ComboBox Then                '如果当前控件类型是 ComboBoxDim 组合框控件 = TryCast(控件, ComboBox)   '把控件 转成 ComboBox 控件组合框控件.Text = ""End If'清理所有ListBox控件If TypeOf 控件 Is ListBox Then                '如果当前控件类型是 ListBoxDim 列表框控件 = TryCast(控件, ListBox)   '把控件 转成 ListBox 控件列表框控件.Items.Clear()                  '清空当前控件内容End If'清理所有ListBox控件If TypeOf 控件 Is TextBox Then                '如果当前控件类型是 TextBoxDim 列表框控件 = TryCast(控件, TextBox)   '把控件 转成 TextBox 控件列表框控件.Text = ""                      '清空当前控件内容End IfNextEnd Sub

这篇关于VB.NET 循环窗体内所有控件的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！

---