生手求问一段MSHFlexGrid1代码

新手求问一段MSHFlexGrid1代码
Private Sub ComFind_Click()
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sql As String
  
  Set cn = New ADODB.Connection
  cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\编程12.7.21\dingdanchaxun.mdb;"
    sql = "select * from 订单查询 where 订单号 = ' " & Trim(Text1.Text) & " ' "
    Set rs = New ADODB.Recordset
        rs.Open sql, cn, adOpenForwardOnly, adLockBatchOptimistic
        Set MSHFlexGrid1.Recordset = rs
        MSHFlexGrid1.Refresh
    rs.Close
    cn.Close
       
  Set rs = Nothing
  Set cn = Nothing
End Sub


运行以后一点查询按钮，MSHFlexGrid1里面就什么数据都木有了，怎么回事啊？已经折腾一下午一早上了
原谅我没有积分，只能发到非技术区
[解决办法]
应该是没有符合条件的记录，你在数据库中查一下输入的订单号是否存在

[解决办法]

引用:

应该是没有符合条件的记录，你在数据库中查一下输入的订单号是否存在

有记录啊，MSHFlexGrid在下面已经显示的记录，输入以后查找就全都消失了
[解决办法]

引用:

引用:

应该是没有符合条件的记录，你在数据库中查一下输入的订单号是否存在


有记录啊，MSHFlexGrid在下面已经显示的记录，输入以后查找就全都消失了

你把sql字符串debug.print出来，然后直接在数据库里查询，看有没有记录
[解决办法]
用的是绑定，这样记录记close了大丈夫？
[解决办法]

引用:

用的是绑定，这样记录记close了大丈夫？

这个。。。其实是个低级失误，应该是某个字符写错了，重新写了一遍就通过了，谢谢回复

查看更多 下一篇