If ComboBox1.Caption = "丰米" Then
UserForm1.Hide
UserForm2.Show
End If
If ComboBox1.Caption = "安心" Then
UserForm1.Hide
UserForm3.Show
End If
If ComboBox1.Caption = "池上" Then
UserForm1.Hide
UserForm4.Show
End If作者: 小俠客 時間: 2012-9-4 17:16
select case ComboBox1.Caption
case "丰米"
UserForm1.Hide
UserForm2.Show
case "安心"
UserForm1.Hide
UserForm3.Show
case "池上"
UserForm1.Hide
UserForm4.Show
end select