请问在vb中如何才能实现显示出数据表里的所有内容

解决方案 »

  1.   

    如一楼所说, 
    最简单的就是用一个ado控件各一个datagrid控件.
    至于用法, 你看一下,msdn就可以了, 有例子的,.
      

  2.   

    你首先要在VB菜单中:
    “工程”-->“引用”-->“Microsoft AxtiveX Data Objects 2.X Library”
    注:2.X为版本号,如果你机子上有高版本的就用高版本的,如:2.5或2.6的。Private Sub cmddisp_click()
      Dim cn As New ADODB.Connection
      Dim rs As New ADODB.Recordset
      Dim cnstr As String
      cnstr = connectstring = "Provider=Microsoft.Jet.OLEDB.4.0;" _
                       & "Data Source=" & App.Path & "\data\yourdb.mdb;" _
                       & "Persist Security Info=False"
      cn.Open cnstr
      rs.CursorLocation = adUseClient
      rs.Open "select * from XXX", cn, adOpenKeyset, adLockBatchOptimistic
      Set DataGrid1.DataSource = rs
      DataGrid1.Refresh
    End Sub将XXX表中的记录显示在datagrid控件中。