在VB中顯示數據庫表通常需要使用ADO.NET或者Entity Framework等數據訪問技朧。以下是一個基本的示例代碼,演示如何連接數據庫并顯示表中的數據:
Imports System.Data.SqlClient
Public Class Form1
Dim connectionString As String = "Data Source=YourServer;Initial Catalog=YourDatabase;Integrated Security=True"
Dim sqlConnection As New SqlConnection(connectionString)
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim sqlQuery As String = "SELECT * FROM YourTable"
Dim sqlCommand As New SqlCommand(sqlQuery, sqlConnection)
Dim dataAdapter As New SqlDataAdapter(sqlCommand)
Dim dataTable As New DataTable()
sqlConnection.Open()
dataAdapter.Fill(dataTable)
sqlConnection.Close()
DataGridView1.DataSource = dataTable
End Sub
End Class
在上面的示例中,我們首先創建了一個數據庫連接字符串,并在Form1_Load事件處理程序中執行了一個簡單的SELECT查詢。然后使用數據適配器將查詢結果填充到一個數據表中,最后將數據表綁定到DataGridView控件上,從而顯示數據庫表中的數據。您需要根據自己的實際情況修改連接字符串和SQL查詢語句。