打开数据库问题？

Question

我想用下面的语句将tdxc表中的wjj和sjt2字段内容显示到List1.text和Text1其中，sjt2为　XX年X月X日的日期类型，wjj 为文本类型，运行程序后，单击List1鼠标总是变漏型，程序无法响应停止，textText1和Text2无任何显示，请大家帮看下，问题出在哪？谢谢
  Dim adoRs As ADODB.RecordsetScreen.MousePointer = vbHourglass
  DoEvents
Set adoRs = adoConn.Execute("SELECT * FROM tdxc WHERE sjt2=" & List1.text & _
  " AND wjj='" & Combo1.text & "'", , adCmdText)
  If adoRs.EOF Then Exit Sub
  Text1.text = adoRs!rwt1‘文本类型
  Text2.text = adoRs!sjt2

Answer 1

("SELECT * FROM tdxc WHERE sjt2=  '  " & List1.text & _ 
  "   '  AND wjj='" & Combo1.text & "'", , adCmdText) 

Answer 2

输出SQL语句，然后把语句放到数据库中执行一下就知道什么问题了