小弟是新手,做练习的时候出现了问题,求各位高手指点,谢谢!
程序如下:
Private Sub Combo1_Click()
    Text1.Text = "你选择了" &Combo1.Text& "运动"   ****此行一直显示为红色,并提示缺少语句结束****
    Combo1.Text = ""
    Combo1.SetFocus
End SubPrivate Sub cmdadd_Click()
    Combo1.AddItem Combo1.Text
    Combo1.Text = ""
    Combo1.SetFocus
End SubPrivate Sub cmdexit_Click()
    End
End Sub