Private Sub Form_Load()Combo1.AddItem "aaaaaaa"Combo1.AddItem "ddddddd"End SubPrivate Sub Combo1_Click()Combo2.Text = Combo1.TextText1.Text = Combo1.TextEnd Sub是这个意思?
Private Sub Combo1_click()MsgBox ("ddd")End Sub