vb mysql如何创建表

Imports System.Data.SqlClient

Module Module1
    Sub Main()
        Dim connectionString As String = "Server=your_server_address;Database=your_database_name;Uid=your_username;Pwd=your_password;"
        Dim sql As String = "CREATE TABLE IF NOT EXISTS Employees (EmployeeID INT PRIMARY KEY, FirstName VARCHAR(50), LastName VARCHAR(50), HireDate DATE)"

        Try
            Using connection As New SqlConnection(connectionString)
                Dim command As New SqlCommand(sql, connection)
                connection.Open()
                command.ExecuteNonQuery()
                Console.WriteLine("Table created successfully.")
            Catch ex As Exception
                Console.WriteLine("Error: " & ex.Message)
            End Try
        End Sub
    End Module
End Module