阅读量:0
在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查询语句。