电脑网络 手机数码 生活 游戏 体育运动 明星影音 休闲爱好 文化艺术 就业职场 教育科学 健康医疗 商业理财 情感家庭 地区 其他

VB系统提示:实时错误3131 FROM子句语法错误。提示黄色在是17行,请高手指导错误出在哪里

时间:2023-02-02 22:40:50

1  Private Sub CmdSelect_Click() 查询

2  Dim str As String, chk As String

3  ***.enabled = False

4  ***.enabled = False

5  ***.enabled = False

6  ***.enabled = False

7  ***.enabled = True

8  ***.enabled = False

9  ***.enabled = False

10  chk = InputBox("输入查询条件:例如 姓名=“叶枫”", "查询")

11  If chk = "" Then Exit Sub 输入零长度(直接按【enter】则退出

12  str = "select StuID,StuName,StuSex,StuBirthDate,StuClass,StuFrom,StuTtuTel"

13  str = str & " from StuInfo wherehere StuName=" & "" & chk & """构成 SQL字符串"

14  ***.connect = "Access"                                                          

15  ***.databasename = "C:\Program Files (x86)\Microsoft Visual Studio\VB98\***.mdb"

16  ***.recordsource = str 记录源来自SQL查询                                      指定要连接的数据库

17  ***.refresh 控件刷新

18  If data1.***.eof And data1.***.bof Then

19  Exit Sub

20  End If

21  ***.datafield = "StuID"

22  ***.datafield = "StuName"

23  ***.datafield = "StuSex"

24  ***.datafield = "StuBirthDate"

25  ***.datafield = "StuClass"

26  ***.datafield = "StuFrom"

27  ***.datafield = "StuTel"

28  End Sub

最佳答案

你的SQL语句有个明显的错

from StuInfo wherehere ....

这里的wherehere应

若还有其它错,可能就是程序中表字段与数据库中不一致了。

相关推荐
  • 网上买的HTC G17 系统提示更新,点击后 系统重启,然后一直停留在绿色HTC三个字母的界面,求高手指点,
  • [求助]系统提示某文件损坏,运行CHKBSK修复!请问在那里运行CHKBSK?急 ...
  • 求JAVA大神指导。。我写的一下用键盘上下左右控制小球移动的代码。。老有两个错误·以下为错误信息和代码
  • 前些日子安装的WIN7系统。现在搜狐、网易无法打开,淘宝页面不正常。新浪等网站OK。请帮忙,感谢!!
  • 您好,通过MMC控制台打开,COM 报错“错误代码8004E00F“,请问这个问题要怎么解决
  • 自己架设的传奇私出现准备加载插件信息...加载IP所在地区查询插件成功...正在读取配置信息...正在加载客户端版本信息..正在加载物品数据库...[2014-11-21 14:05:54] 游戏引擎启动异常!!!下面还有很多,只是在这里发不出来,帮到我的追加200分
  • 各位大神,第六行看看有什么不对,系统说invalid syntax”但是我加了冒号的呀!
  • © 孔德问答