在VB中執行SQL命令可以使用ADO.NET來實現。以下是一個簡單的示例：
首先，需要引入相關的命名空間：
Imports System.Data.SqlClient
然后，創建一個SqlConnection對象來連接到數據庫：
Dim connectionString As String = "Your Connection String"
Dim connection As New SqlConnection(connectionString)
接下來，創建一個SqlCommand對象，并指定要執行的SQL命令：
Dim sql As String = "SELECT * FROM YourTable"
Dim command As New SqlCommand(sql, connection)
然后，打開數據庫連接：
connection.Open()
接著，執行SQL命令并獲取結果：
Dim reader As SqlDataReader = command.ExecuteReader()
While reader.Read()
' 讀取數據
Dim column1 As String = reader.GetString(0)
Dim column2 As Integer = reader.GetInt32(1)
' ...
End While
reader.Close()
最后，關閉數據庫連接：
connection.Close()
請注意，以上代碼僅為示例，您需要根據實際情況進行適當的修改和調整。另外，還可以使用其他方法來執行不同類型的SQL命令，如ExecuteNonQuery用于執行INSERT、UPDATE或DELETE語句，ExecuteScalar用于執行返回單個值的SQL命令等。
