VB的中combobox和command两个控件使用方法,该如何解决

VB的中combobox和command两个控件使用方法
VB的中combobox和command两个控件使用方法，
希望选择combobox组合框中的项后再点击command控件触发某一事件，比如，选择combobox中的蔬菜一项，点command后label1能显示：萝卜，青菜，小白菜。。代码该如何写。。。谢谢~~

[解决办法]
Form中拖ComboBox、Label和Command控件各一个，然后把下面代码复制进去就可以看到效果：

Private Sub Command1_Click()
Select Case Combo1.ListIndex
Case 0
Label1.Caption = "萝卜，青菜，小白菜 "
Case 1
Label1.Caption = "苹果，香蕉，哈密瓜 "
End Select
End Sub

Private Sub Form_Load()
With Combo1
.AddItem "蔬菜 "
.AddItem "水果 "
End With
Combo1.ListIndex = 0
End Sub