For Each list As String In CheckedListBox1.CheckedItems CheckState.Checked.ToString() sqlcon.Open() Dim cmd As SqlClient.SqlCommand Dim sql As String = "CREATE TABLE" + "[" + St + "]" + "(Id INTEGER Not Null PRIMARY KEY CLUSTERED ([Id] ASC)," + list.ToString + " NVARCHAR (MAX) NULL)" cmd = New SqlClient.SqlCommand(sql, sqlcon)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)