Question

vb中如何把查询到的数据显示在msflexgrid上呢 请高手来围观解答啊

给图：这是一开始运行的界面

当我点击查找按钮时 跳出对话框 我输入查询条件（故障代码：5）显示如下：

现在我想实现的功能时 如何能把查找到的这条内容数据显示在msflexgrid控件上呢；求高手指点，在线等啊





Answer 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) + "'"

Answer 2

你用msHflexgrid吧，msflexgrid不支持，需要单个写，带H 的是6.0的，可以直接绑定

追问

呵呵 好吧 我试试 你不是在忙你的项目吗 可是我没用过这个控件啊 怎么用a