MSFlexGrid 控件有什么特性，它不能直接绑定ADO控件吗

MSFlexGrid 控件有什么特性，它不能直接绑定ADO控件吗Set MSFlexGrid1.DataSource = ADODC1程序说有错误

应使用MSHFlexGrid控件。MSFlexGrid控件只能绑定DATA控件，见VB5.0帮助文档。如想能绑定ADO控件必须使用它的升级版本MSHFlexGrid控件，它既能绑定DATA控件也能绑定控件，见VB6.0帮助文档。
如选DATA控件，则代码为：Set MSFlexGrid1.DataSource = DATA1  (默认是mdb，不支持SQL)
-----------------------
'菜单"工程"->"引用" 找 Microsoft ActiveX Data Object....

Dim cn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim SqlStr As String
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Mode=ReadWrite;Persist Security Info=False;Jet OLEDB:Database Password=111"
SqlStr = "Select * From 某个表"
rst.CursorLocation = adUseClient
rst.Open SqlStr, cn, adOpenDynamic, adLockOptimistic, adCmdText '打开记录集
Set MSFlexGrid1.DataSource = rst '给DataGrid修改数据源




你的位置: 问答吧 -> VB -> 问题详情
vb 怎么将文本导入到MSFLEXGRID 控件里
怎么将N行文本， 导入到MSFLEXGRID 控件里
格式为:
张三----男
李四---- 男
小王-----男
李四---- 男
如果有重复项，就不导入重复项，

导入成功后，再保存MSFLEXGRID 控件中的内容到文本文档
作者: maomingao20   发布时间: 2011-06-01
没用过msflexgrid控件,不过用过datagrid
哦对了,为什么lz不将txt导入到excel或者其他数据库中呢?
这样就省去了循环对txt中字符串的处理了,因为msflexgrid可以一次性读取数据库的数据并显示.

首先引用msflexgrid控件,
VB code
private sub form_load()
Dim cn As New ADODB.Connection, rs As New ADODB.Recordset
    cn.CursorLocation = adUseClient
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\temp.xls;Extended Properties='Excel 8.0;HDR=Yes'"
    rs.Open "select * from [Sheet1$]", cn, adOpenDynamic, adLockOptimistic    
    Set msflexgrid1.DataSource = rsend sub

VB查询数据库代码
https://wenku.baidu.com/view/fe27f678346baf1ffc4ffe4733687e21ae45ff7a.html
---------------------


如选ADO控件，则代码为：Set MSHFlexGrid1.DataSource = ADODC1 (可以支持多种 ，SQL，mdb等)

推荐本站淘宝优惠价购买喜欢的宝贝:

本文链接：https://hqyman.cn/post/3700.html 非本站原创文章欢迎转载，原创文章需保留本站地址！

休息一下~~