sContactQuery = "SELECT * FROM 结算表 WHERE 用户代号='" & Label8.Caption & "'"
         Set rsContact = New ADODB.Recordset
         rsContact.CursorLocation = adUseClient
         rsContact.Open sContactQuery, conn, adOpenStatic
       
         Set Datagrid1.DataSource = Nothing
         Set Adodc2.Recordset = rsContact
         Set Datagrid1.DataSource = rsContact
       
我想通过这些代码将表中的所有记录都显示在datagrid1中,但是,表中的字段有的是文本类型,有的是数字类型,有的是货币类型,请问sContactQuery应该定义成什么类型的.
同时请大家帮忙看看这段代码有没有问题谢谢