主题：[求助]求助：单击其中一个COMBOBOX，自动清空所有COMBOBOX代码。

 你这样做，是不是有矛盾？你这样做以后，每次，你都只能有一个combobox有值，其余都会被清空的啊。

 去编写TextChanged事件

 

systemReady = False
Dim cbxs() As String = {"combobox1","combobox2","combobox3"}
For Each cbx As String In cbxs
    If cbx <> e.sender.name Then
        e.form.controls(cbx).Text = Nothing
    End If
Next
systemReady = True