
VB中当CHECKBOX选中时,TEXTBOX 不可编辑并且显示灰色
1个回答
展开全部
Private Sub Check1_Click()
If Check1.Value = 1 Then
Text1.Enabled = False
Text1.BackColor = &H8000000F
Else
Text1.Enabled = True
Text1.BackColor = vbWhite
End If
End Sub
If Check1.Value = 1 Then
Text1.Enabled = False
Text1.BackColor = &H8000000F
Else
Text1.Enabled = True
Text1.BackColor = vbWhite
End If
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询