在VB中,当选一个单选按钮,文本框正常输入,选另一单选按钮,文本框不可输入,且为灰色,怎么实现?

注意:不仅不可以使用文本框,而且也要使文本框底色为灰色

代码如下:前提,放置到form上一个text,2个option
Private Sub Option1_Click()
If Option1.value = True Then
Text1.Enabled = False
Else
Text1.Enabled = True
End If
End Sub
Private Sub Option2_Click()
If Option2.value = True Then
Text1.Enabled = True
Else
Text1.Enabled = False
End If
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2009-01-06
文本框有个属性叫knocked,差不多就叫这个,改成false,就行了吧!
第2个回答  2009-01-06
变灰色,应是enable属性
第3个回答  2009-01-06
第一个单选的单击代码:
text1.Enabled =true
第二个等于FLASE
单选按钮的单击事件
Private Sub Option1_Click(Index As Integer)
If Index = 0 Then
Text1.Enabled = True
ElseIf Index = 1 Then
Text1.Enabled = False
End If
End Sub