请输入专案类型(网站专案或者应用程式专案):
2010 Express
想在checkbox打勾的时候,让textbox可动作,显示蓝色
取消勾选的时候,textbox不可动作,显示灰色,
但是下面这段程式码并不会做任何动作,
想请问版上的各位先进哪个部份出了问题:
Private Sub CheckBox1_CheckedChanged(sender As System.Object, e As
System.EventArgs) Handles CheckBox1.CheckedChanged
test(CheckBox1.Checked, TextBox1.Enabled, TextBox1.BackColor)
End Sub
Private Sub test(a As Boolean, b As Boolean, c As Color)
If a = True Then
b = True
c = Color.Blue
ElseIf a = False Then
b = False
c = Color.Gray
End If
End Sub
个人认为可能是副程式的定义上有问题,
但又不知道是哪个地方有问题,
还请指导,非常感谢!