訪問從MS Access數據和網格視圖中顯示

Question

我不能夠在網格視圖中顯示任何數據，它是一個空白的DataGrid 的連接是開放的，一切都很好，但沒有得到顯示的數據！我是新手

Imports System.Data.OleDb 

Class Form2 
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
     con.Open() 

    Dim dvginfo As DataGridView 

    Dim table As New DataTable("Address") 

    Dim da As New OleDbDataAdapter("Select * FROM Address", con) 
    Dim dtrow As DataTable 
    da.Fill(table) 
    If table.Rows.Count = 0 Then 
     Return 
    End If 



    For Each dtrow In table.Rows 
     dvginfo.Rows.Add() 
     dvginfo.Rows(dvginfo.RowCount - 1).Cells("colFirstname").Value = dtrow("Firstname").ToString() 
     dvginfo.Rows(dvginfo.RowCount - 1).Cells("colLastname").Value = dtrow("Lastname").ToString() 
     dvginfo.Rows(dvginfo.RowCount - 1).Cells("colDOB").Value = Convert.ToDateTime(dtrow("DOB").ToString()) 
    Next 
    dvginfo.ClearSelection() 
    con.Close() 
End Sub 
End Class 

Answer 1

嘗試......

Imports System.Data.OleDb 

Class Form2 
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
con.Open() 

Dim dvginfo As DataGridView 

Dim table As New DataTable("Address") 

Dim da As New OleDbDataAdapter("Select * FROM Address", con) 
Dim dtrow As DataTable 
da.Fill(table) 
dvginfo.DataSource = table 
con.Close() 
End Sub 
End Class