在窗体上画两个组合框,其名称分别为Combo1、Comb02,然后画两个标签,名称分别为Label1、Label2,如
Privte Sub Combo1_Click() Call Showltem(Comb01.Label1) End Sub Private Sub Combo2_Click() Call Showltem(ComboLabe12) End Sub Public Sub Showhem(tmpCombo As ComboBox,tmpLabd As Label), 【 】Caption=【 】.Text End Sub