高手们，进来帮帮忙，SQL查询问题

Private Sub Command4_Click()
Set ad5 = New Recordset
ad5.Open "select 选课父表.学号,选课子表.课程号,学生信息表.姓名,课程信息表.课程名称 from 选课父表,选课子表,学生信息表,课程信息表 where 选课父表.序号=选课子表.序号 and 选课父表.序号='" & m & "' and 选课父表.学号=学生信息表.学号 and 选课父表.学号='" & Text4.Text & "' and 选课子表.课程号=课程信息表.课程号 and  选课子表.选课日期 <= # " & Text3.Text & " # and 选课子表.选课日期 >= # " & Text2.Text & " # ", db, adOpenStatic, adLockOptimistic
ad5.Requery
Text6.Text = ad5.RecordCount
Set DataGrid1.DataSource = ad5
Text2.SetFocus
End Sub
  

我这个查询字段运行的时候为什么没有结果显示？结果记录为空 --------------------编程问答-------------------- ad5定義錯誤.... --------------------编程问答-------------------- 你把sql语句打印出来，然后拿到sqlserver里去执行看下，看有没有记录

补充：VB ,  基础类