以下是使用VB.NET连接数据库的基本代码示例：
1. 首先需要在程序中引用 System.Data.SqlClient 命名空间。
2. 在代码中定义连接字符串，指定要连接的数据库服务器、数据库名称、用户名和密码等信息。例如：
Dim connStr As String = "Server=myServerAddress;Database=myDataBase;User Id=myUsername;Password=myPassword;"
3. 创建一个 SqlConnection 对象，使用连接字符串打开数据库连接。例如：
Dim conn As New SqlConnection(connStr)
conn.Open()
4. 在需要执行 SQL 语句的地方，创建一个 SqlCommand 对象，并将 SQL 语句和 SqlConnection 对象传递给它。例如：
Dim sql As String = "SELECT * FROM myTable"
Dim cmd As New SqlCommand(sql, conn)
5. 调用 SqlCommand 对象的 ExecuteReader 方法执行 SQL 查询，并获取返回的数据。例如：
Dim reader As SqlDataReader = cmd.ExecuteReader()
While reader.Read()
' 读取数据并进行处理
End While
reader.Close()
6. 在程序结束时，关闭数据库连接。例如：
conn.Close()
完整的示例代码如下：
Imports System.Data.SqlClient
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
' 定义连接字符串
Dim connStr As String = "Server=myServerAddress;Database=myDataBase;User Id=myUsername;Password=myPassword;"
' 创建 SqlConnection 对象并打开连接
Dim conn As New SqlConnection(connStr)
conn.Open()
' 创建 SqlCommand 对象并执行查询
Dim sql As String = "SELECT * FROM myTable"
Dim cmd As New SqlCommand(sql, conn)
Dim reader As SqlDataReader = cmd.ExecuteReader()
' 处理返回的数据
While reader.Read()
' 读取数据并进行处理
End While
' 关闭连接和释放资源
reader.Close()
conn.Close()
End Sub
End Class
