谁可以告诉我如何通过msflexgrid实现查询? 高分相给!
最好能有代码,谢谢

解决方案 »

  1.   

    相信大家都听不懂你的话。
    如果前提是msglexgrid 有记录的话
       if msglexgrid.textMatrix(行,列)  =  " 字符 "  then     '(匹配条件 )
          ............
       else
          .....
       endif
      

  2.   

    建议用MSHFlexGrid和ADOPublic Con As New ADODB.Connection
    Public Rs As ADODB.RecordsetPrivate Sub Form_Load()
    Dim sql As StringCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrator\デスクトップ\use.mdb;Persist Security Info=False"Set Rs = New ADODB.Recordset
    Rs.Open "select * from use", Con, adOpenStatic, adLockBatchOptimisticSet MSFlexGrid1.DataSource = Rs.Fields
    End Sub
      

  3.   

    修改:
    Public Con As New ADODB.Connection
    Public Rs As ADODB.RecordsetPrivate Sub Form_Load()
    Dim sql As StringCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrator\デスクトップ\use.mdb;Persist Security Info=False"Set Rs = New ADODB.Recordset
    Rs.Open "select * from use", Con, adOpenStatic, adLockBatchOptimisticSet MSHFlexGrid1.DataSource = Rs
    End Sub