Question

vb checkbox问题

当点checkbox时，text1可用。再点一下时text1不可用。如何实现。

Answer 1

我们在回答别人的问题时,要试过是不是真的OK。这是一种责任，要不然可能制造垃圾信息。
二楼的代码也是有低级错误的，将enabled写成了enable；另外，没有搞清楚check的value可以取几个值。所以代码运行不了也就很正常了。
以下的代码能实现楼主想要的功能，并且我在VB中运行通过：

Private Sub Check1_Click()
If Check1.Value = 1 Then
Text1.Enabled = True
Else
Text1.Enabled = False
End If
End Sub

check1的value值有3种，0-unchecked,1-checked,2-grayed。所以在这里不能写成check1.value=true，只能写成check1.value=1。
另外，locked属性是设置文本框能否被编辑，enabled属性则设置激活属性，即对事件作出反应与否。所以在这里要选enabled属性。

希望能帮到楼主。

Answer 2

楼上属性错了！~应该用Enable！
Private Sub Check1_Click()
If Check1.Value = True Then
Text1.Enable= True
Else
Text1.Enable= False
End If
End Sub

Answer 3

Private Sub Check1_Click()
If Check1.Value = True Then
Text1.Locked = True
Else
Text1.Locked = False
End If
End Sub