主题：一键还原窗口内的所有组合框控件为初始状态

大家好！请问大家，我在窗口里面建立好多组合框，请问能够设置一按钮，可以点击这个按钮实现，所有组合框都回到初始状态呢（即，没有在下拉列表中做任何选择的状态）。

还有就是，附件中除了“main”以外的其他表可以隐藏么？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.foxdb

你弄个开发版的格式，试用版用户插不上嘴了。

哪个表都可以隐藏。

For Each c As WinForm.Control In e.Form.Controls
    If TypeOf c Is WinForm.ComboBox Then
        Dim cmb As WinForm.ComboBox = c
        cmb.Text = ""
    ElseIf TypeOf c Is WinForm.TextBox Then
        Dim txt As WinForm.TextBox = c
        txt.Text = ""
    ElseIf TypeOf c Is WinForm.CheckedComboBox Then
        Dim chcmb As WinForm.CheckedComboBox = c
        chcmb.Text = ""
    End If
Next

感谢版主！