在VB中,可以使用ADO.NET来查询数据库并显示结果。以下是一个简单的示例:
Imports System.Data.SqlClient
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'数据库连接字符串
Dim connStr As String = "Data Source=服务器地址;Initial Catalog=数据库名;User ID=用户名;Password=密码"
'创建数据库连接对象
Using conn As New SqlConnection(connStr)
'创建SQL查询语句
Dim sql As String = "SELECT * FROM 表名"
'创建数据库命令对象
Using cmd As New SqlCommand(sql, conn)
'打开数据库连接
conn.Open()
'执行查询,并返回结果集
Dim reader As SqlDataReader = cmd.ExecuteReader()
'循环读取结果集中的每一行数据
While reader.Read()
'根据字段名称获取字段值
Dim value As String = reader("字段名").ToString()
'将字段值显示在界面上
MessageBox.Show(value)
End While
'关闭结果集
reader.Close()
End Using
'关闭数据库连接
conn.Close()
End Using
End Sub
End Class
在上面的示例中,首先创建数据库连接对象,并指定数据库连接字符串。然后创建SQL查询语句,并创建数据库命令对象。接下来打开数据库连接,执行查询,并返回结果集。通过循环读取结果集中的每一行数据,并将字段值显示在界面上。最后关闭结果集和数据库连接。
需要根据实际情况修改示例中的服务器地址、数据库名、用户名、密码、表名和字段名。
辰迅云「云服务器」,即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘,价格低至29元/月。点击查看>>
推荐阅读: jsp怎么向数据库添加数据