在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命令等。
