当前位置:编程学习 > VB >>

急!datagrid控件

datagrid 控件什么也显示不出来,用的Access数据库

   Dim cn   As New adodb.Connection                                    
   Dim rs   As New adodb.Recordset
  cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:aa\KFGL.MDB;Persist Security Info=False"
    
'cnn.Open
请问怎么样,才能显示出来数据,不用Adodc控件的话。
谢谢了。 --------------------编程问答--------------------
Private Sub Form_Load()
Private Sub Form_Load()
    Dim cn As New ADODB.Connection '定义数据库的连接存放数据和代码
    Dim rs As New ADODB.Recordset
    Dim sql As String
    sql = "select * from jishijilu where car_bm like 'DF160%'" '左句按你实际的结构化查询语句写
    cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:aa\KFGL.MDB;Persist Security Info=False"
    cn.Open
    rs.CursorLocation = adUseClient
    rs.Open sql, cn, adOpenDynamic, adLockOptimistic
    Set DataGrid1.DataSource = rs
End Sub
--------------------编程问答-------------------- 好的,我试试看行不 --------------------编程问答-------------------- 接分先! --------------------编程问答-------------------- 有点难度哦 --------------------编程问答-------------------- 楼上的正解。
http://topic.csdn.net/u/20080421/15/54b1de89-e1aa-4926-bd85-66888282d229.html
补充:VB ,  数据库(包含打印,安装,报表)
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,