Private Sub cbResp1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cbResp1.Click
Select Case cbResp1.Text
Case Is = "Buena"
Correctas = Correctas + 1
Case Is = "Mala"
Correctas = Correctas
End Select
Me.cbResp1.Enabled = False
End Sub
希望你能帮助我,谢谢
答案 0 :(得分:0)
试试这个......
Private Sub cbResp1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cbResp1.Click
Select Case cbResp1.Text
Case "Buena"
Correctas = Correctas + 1
Me.cbResp1.Enabled = False
Case "Mala"
Me.cbResp1.Enabled = False
End Select
End Sub
答案 1 :(得分:0)
让我告诉你我已经修好了!看看这个活动。问题是我在点击时试图锁定它,但我不得不在SelectedIndexChanged事件中编程锁定。谢谢你的帮助