标题: 请教版主[求助]!!! [打印本页] 作者: 蓝精灵007 时间: 2002-5-30 18:37 标题: 请教版主[求助]!!! 请教版主:
近日我正在做一个查询程序现程序如下:
Private Sub cmdfind_Click()
If txtfind.Text = "请输入高一" Then
'执行查询语句
查找.查找
ElseIf txtfind.Text = "请输入高二" Then
查找.查找
ElseIf txtfind.Text = "请输入高二" Then
查找.查找
End If
End Sub
Private Sub comfind_Click()
If comfind.Text = "高一" Then
txtfind.SetFocus
txtfind.Text = "请输入高一"
ElseIf comfind.Text = "高二" Then
txtfind.SetFocus
txtfind.Text = "请输入高二"
ElseIf comfind.Text = "高三" Then
txtfind.SetFocus
txtfind.Text = "请输入高三"
End If
End Sub
Private Sub txtfind1_Click()
txtfind1.SetFocus
End Sub
可是在运行cmdfind_Click()时,系统提示"运行时错误'2115'为这各字段的beforeupdate或validationrule属性或函数将阻止microsoft access 在字段中保存数据"我不知道系统提示是什莫意思,请指教!!!