主题：[求助]面板

参考代码，SelectedIndexChanged

If e.Sender.Text > "" Then
    e.Form.controls(e.sender.text).Visible = False
End If

那就类似这样写代码

Dim pns() As String = {"面板1", "面板2", "面板3", "面板4"}
For Each pn As String In pns
    e.Form.controls(pn).Visible = False
Next