Private Sub Combo1_Click() If Combo1.Text = "aa" Then End ElseIf Combo1.Text = "大大" Then Text1.Text = 0 End If End Sub Private Sub Form_Load() Combo1.Clear Combo1.AddItem "aa" Combo1.AddItem "大大" Text1.Text = "" End Sub
[此贴子已经被作者于2016-12-5 10:04编辑过]