Private Sub opt1_Click()
Combox1.AddItem opt1.Caption
End Sub
Private Sub opt2_Click()
Combox1.AddItem opt2.Caption
End Sub
Private Sub opt3_Click()
Combox1.AddItem opt3.Caption
End Sub
Private Sub opt4_Click()
Combox1.AddItem opt4.Caption
End Sub
Private Sub opt5_Click()
Combox1.AddItem opt5.Caption
End Sub
Private Sub opt6_Click()
Combox1.AddItem opt6.Caption
End Sub
Private Sub opt7_Click()
Combox1.AddItem opt7.Caption
End Sub
Private Sub opt8_Click()
Combox1.AddItem opt8.Caption
End Sub
Private Sub opt9_Click()
Combox1.AddItem opt9.Caption
End Sub
Private Sub opt10_Click()
Combox1.AddItem opt10.Caption
End Sub