我建了个SSTab控件(3项的),在这个窗体上还有1个ADO和3个DataGrid控件(已和数据库绑定),3个DataGrid控件分别在SSTab控件的三个选项卡中,通过单击不同选项卡查询指定列,可是程序报错,应该怎么办?
代码如下:
Private Sub SSTab1_Click(PreviousTab As Integer)
If PreviousTab = 0 Then
adoRoom.RecordSource = "select 房间号,房间类型 from 房间信息 where 状态='未使用'"
adoRoom.Refresh
Set dgdRoom.DataSource = adoRoom
End If
If PreviousTab = 1 Then
adoRoom.RecordSource = "select 房间号,房间类型,姓名,性别,身份证号,备注 from 房间信息 where 状态='预订'"
adoRoom.Refresh
Set dgdOrder.DataSource = adoRoom
End If
If PreviousTab = 2 Then
adoRoom.RecordSource = "select * from 房间信息 where 状态='使用中'"
adoRoom.Refresh
Set dgdUse.DataSource = adoRoom
End If
End Sub
运行后说我FROM子句语法错误!
请问应该怎么改?
代码如下:
Private Sub SSTab1_Click(PreviousTab As Integer)
If PreviousTab = 0 Then
adoRoom.RecordSource = "select 房间号,房间类型 from 房间信息 where 状态='未使用'"
adoRoom.Refresh
Set dgdRoom.DataSource = adoRoom
End If
If PreviousTab = 1 Then
adoRoom.RecordSource = "select 房间号,房间类型,姓名,性别,身份证号,备注 from 房间信息 where 状态='预订'"
adoRoom.Refresh
Set dgdOrder.DataSource = adoRoom
End If
If PreviousTab = 2 Then
adoRoom.RecordSource = "select * from 房间信息 where 状态='使用中'"
adoRoom.Refresh
Set dgdUse.DataSource = adoRoom
End If
End Sub
运行后说我FROM子句语法错误!
请问应该怎么改?
解决方案 »
- 爬虫程序
- vb activereport 页面如何设置
- 一个已经编译好的exe,如何查看改exe使用了哪些dll,ocx?
- 如何利用ole控件,data,access存取数据库??
- 会不会是内存泄漏问题 真的很急
- 高分求图象轮廓线算法,最好有源代码!!
- 如何才能将ftp服务器上的所有目录放入Treeview控件当中,请给出具体源代码,现场结贴,本人急用,先谢了
- 救命啊!怎么回事啊??
- 求救!!!VBA连接ORACLE数据库报ORA-12154错误,用plsqldev连接正常
- 求教:VB里如何做一个定时器,具体是……
- 代码大神抽时间帮看一下,小女子在此感谢
- 某个按钮被单击应该怎么写?是不是command1_click=true 啊?
没用过ADO控件,不知道具体怎么回事。