我建了个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子句语法错误
请问应该怎么改?