Office中国论坛/Access中国论坛
标题:
帮忙看看这个代码片断,为何老是错误呢?
[打印本页]
作者:
luoxxx_xp
时间:
2004-4-2 04:53
标题:
帮忙看看这个代码片断,为何老是错误呢?
Private Sub Frame9_BeforeUpdate(Cancel As Integer)
Select Case Frame9.Value = 1
Text18.Enabled = False
Text20.Enabled = False
Text22.Enabled = False
Case Frame9.Value = 2
Text18.Enabled = True
Text20.Enabled = False
Text22.Enabled = False
Case Frame9.Value = 3
Text18.Enabled = False
Text20.Enabled = True
Text22.Enabled = True
End Select
End Sub
说明:Frame9为一个选项组,有三个单选框
text18、text20、text22分别为三个文本框
这段代码要实现的就是如果Frame9选第一个,则下面三个文本框都不可用,若Frame9选第二项,则text18可用,另外两个不可用;若Frame9选第三项,则text18不可用,后面两个可用。
我现在运行后,只要做出选择,便提示Select case和第一个case之间的语句和标签无效,请问是我的代码写错了吗?
作者:
tmtony
时间:
2004-4-2 04:57
应该是
Select Case Frame9.value
case 1
Text18.Enabled = False
Text20.Enabled = False
Text22.Enabled = False
作者:
luoxxx_xp
时间:
2004-4-2 05:15
原来这样啊,多谢了啊!tmtony老兄
欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)
Powered by Discuz! X3.3