给个简单的例子

解决方案 »

  1.   

    ado+datagrid
    刚接触数据库时就是这样的,嘿嘿
      

  2.   

    Dim rt As ADODB.Recordset
    Dim cn As ADODB.Connection
    Dim cmd As ADODB.Command
    Dim strconn As StringSet rt = New ADODB.Recordset
    Set cn = New ADODB.Connection
    Set cmd = New ADODB.Commandstrconn = "Driver={Microsoft ODBC for Oracle};" & _
                       "Server=自己添;" & _
                       "Uid=自己添;" & _
                       "Pwd=自己添;"cn.Open strconn
    cn.CursorLocation = adUseClientSet cmd.ActiveConnection = cn
    cmd.CommandText = "select * from workshop_master"
    rt.CursorLocation = adUseClient
    rt.CursorType = adOpenStatic 'adOpenDynamic
    rt.LockType = adLockBatchOptimistic 'adLockOptimisticSet rt = cmd.ExecuteSet DataGrid1.DataSource = rt