在Visual Basic (VB)中創(chuàng)建SQL數(shù)據(jù)表通常涉及到以下幾個步驟：

1. 連接到數(shù)據(jù)庫服務(wù)器。

2. 創(chuàng)建一個SQL命令對象。

3. 執(zhí)行SQL命令來創(chuàng)建數(shù)據(jù)表。

以下是一個簡單的VB示例，演示如何使用ADO（ActiveX Data Objects）連接到SQL Server數(shù)據(jù)庫并創(chuàng)建一個名為`Employees`的數(shù)據(jù)表：

```vb

Imports System.Data.SqlClient

Module Module1

Sub Main()

' 數(shù)據(jù)庫連接字符串

Dim connectionString As String = "Server=你的服務(wù)器名;Database=你的數(shù)據(jù)庫名;User Id=你的用戶名;Password=你的密碼;"

' 創(chuàng)建SqlConnection對象

Using connection As New SqlConnection(connectionString)

Try

' 打開數(shù)據(jù)庫連接

connection.Open()

' 創(chuàng)建SqlCommand對象

Dim command As New SqlCommand("CREATE TABLE Employees (" &

"EmployeeID INT PRIMARY KEY," &

"LastName NVARCHAR(50)," &

"FirstName NVARCHAR(50)," &

"BirthDate DATE," &

"HireDate DATE)", connection)

' 執(zhí)行SQL命令

command.ExecuteNonQuery()

Console.WriteLine("數(shù)據(jù)表創(chuàng)建成功。")

Catch ex As Exception

' 如果出現(xiàn)錯誤，輸出錯誤信息

Console.WriteLine("數(shù)據(jù)表創(chuàng)建失敗: " & ex.Message)

Finally

' 關(guān)閉數(shù)據(jù)庫連接

connection.Close()

End Try

End Using

' 等待用戶按鍵后退出

Console.ReadKey()

End Sub

End Module

```

在上面的代碼中，你需要將`你的服務(wù)器名`、`你的數(shù)據(jù)庫名`、`你的用戶名`和`你的密碼`替換為實際的數(shù)據(jù)庫連接信息。

注意以下幾點(diǎn)：

確保你已經(jīng)安裝了SQL Server并有一個可以連接的實例。

你需要有足夠的權(quán)限來創(chuàng)建數(shù)據(jù)表。

上述代碼示例中創(chuàng)建的`Employees`數(shù)據(jù)表包含四個字段：`EmployeeID`（主鍵）、`LastName`、`FirstName`、`BirthDate`和`HireDate`。

在實際的應(yīng)用程序中，你可能需要根據(jù)你的具體需求調(diào)整數(shù)據(jù)表結(jié)構(gòu)和字段類型。