Mysql динамический заголовок таблицы

Public Class Form1
    Dim mySqCon As New MySqlConnection With {.ConnectionString = "server=localhost;userid=root;password=********;database=testbase"}
    Dim comm, cmd As New MySqlCommand
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        comm.Connection = mySqCon
        mySqCon.Open()
        Try
            comm.CommandText = "create table [COLOR="Red"]abcd[/COLOR] (id INT PRIMARY KEY NOT NULL AUTO_INCREMENT ,name VARCHAR(45) NOT NULL, number INT NOT NULL)"
            comm.Prepare()
            comm.ExecuteNonQuery()
            MessageBox.Show("Создано")
            mySqCon.Close()
        Catch ex As Exception
            MessageBox.Show("Error " & ex.HResult & " has occurred: " & ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
        Finally
            mySqCon.Dispose()
        End Try
    End Sub
End class

Try
    cmd.CommandText = "INSERT " & Dt & " VALUES(NULL" & strad & ")"
    For k = 1 To ComboBox1.SelectedIndex
        cmd.Parameters.AddWithValue("@CH" & k & "_x", 1)
        cmd.Parameters.AddWithValue("@CH" & k & "_y", 0.0)
    Next
    cmd.Prepare()
    For i = 1 To n
        a(i) = Round(Sqrt(i), 4)
        ListBox1.Items.Add(i & vbTab & a(i))
    Next i
    For k = 1 To ComboBox1.SelectedIndex
        For c = k To UBound(a) Step ComboBox1.SelectedIndex
            cmd.Parameters("@CH" & CStr(k) & "_x").Value = c
            cmd.Parameters("@CH" & CStr(k) & "_y").Value = a(c)
            cmd.ExecuteNonQuery()
        Next c
    Next k