where 子句语法错误If Combo1.Text = "在库图书" ThenCall Form_LoadCombo1.ListIndex = 1SQL = "select * from jhk where"rs.Open SQL,connDo While Not rs.EOFIf Not IsDate(rs!HSRQ) ThenBmh$ = rs!BmhFor i = 1 To MSFlexGrid1.Rows - 1If Trim(MSFlexGri
来源:学生作业帮助网 编辑:作业帮 时间:2024/11/02 19:36:28
where 子句语法错误If Combo1.Text = "在库图书" ThenCall Form_LoadCombo1.ListIndex = 1SQL = "select * from jhk where"rs.Open SQL,connDo While Not rs.EOFIf Not IsDate(rs!HSRQ) ThenBmh$ = rs!BmhFor i = 1 To MSFlexGrid1.Rows - 1If Trim(MSFlexGri
where 子句语法错误
If Combo1.Text = "在库图书" Then
Call Form_Load
Combo1.ListIndex = 1
SQL = "select * from jhk where"
rs.Open SQL,conn
Do While Not rs.EOF
If Not IsDate(rs!HSRQ) Then
Bmh$ = rs!Bmh
For i = 1 To MSFlexGrid1.Rows - 1
If Trim(MSFlexGrid1.TextMatrix(i,1)) = Trim(Bmh$) Then
MSFlexGrid1.RemoveItem i
Exit For
End If
Next
End If
rs.MoveNext
Loop
rs.Close
where 子句语法错误If Combo1.Text = "在库图书" ThenCall Form_LoadCombo1.ListIndex = 1SQL = "select * from jhk where"rs.Open SQL,connDo While Not rs.EOFIf Not IsDate(rs!HSRQ) ThenBmh$ = rs!BmhFor i = 1 To MSFlexGrid1.Rows - 1If Trim(MSFlexGri
错误在哪里?