vb中关于msflexgrid控件显示查找到的数据库内容的问题，求大神指点

现在你显示数据的方法是不是让 表格的datasource属性绑定到 Data1 控件上？这样的话，你每次更新

Data1 ，表格中所有数据都将更新，也就是你Data1中是什么数据，表格就是什么数据

就目前我觉得有2个方法

1、就是你每次查找时 修改sql语句的条件，比如你之前的条件是 ".. where errCode = 5"--这里是查询1条记录

你后面重新查找时就将 条件改为 ".. where errCode in (5,6,7)"--这样就可以查出多条记录

2、利用ADO对象 *** 作数据库(具体怎么 *** 作，你可以找些资料，有问题到时候再分析)

这样你每次查找1条记录后，给表格新增1行，写入数据，其他的数据则保留下来

是否又是你在问这个问题了？

你连接的是否为Access 数据库？下面以Access 数据库为例子：

先看一下结果。

窗体中放置好各控件，Form_Load()增加如下的程序：

Private Sub Form_Load()

   With Data1

         .Connect = "Access"

         .DatabaseName = "D:\vbTemp\myDB.mdb"                         ‘数据库所在的全路径及名称

         .RecordSource = "SELECT  * FROM T101 ORDER BY F1"  '这里的T101是我用的表名称

         .Refresh                                                                                ’F1 是我用的字段名称

    End With

End Sub

“查询”按扭增加如下的程序：

Private Sub cmdFind_Click()    

    With Data1

      .RecordSource = "SELECT * FROM T101 WHERE F1 Like '" + Trim(txtCode) + "*'"

      .Refresh

    End With    

End Sub

1、添加 MSFlexGrid 控件：

“工程”->"部件"->"选择 Microsoft FlexGrid Control 6.0"->"确定"

2、Data 控件应该会设置吧

3、窗体上放置该控件，设置其 DataSource 属性=Data1

3、添加需要的程序

4、程序中的 "F1" 是我用字段名称，代表的是“错误编号”

5、查询中用 Like 语句可以获得相关的结果，也可以用 "=" 但后面不需要*“符号

"SELECT * FROM T101 WHERE F1 ='" + Trim(txtCode) + "'"

---