Ciao a tutti ho scritto questo codice per insetire in una tabella sql di nome "Utenti"

Private Sub ButtonOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonOK.Click

If TextBoxNome.Text = ("") Or TextBoxCognome.Text = ("") Or TextBoxUtente.Text = ("") Or TextBoxPassword.Text = ("") Or ComboBoxDirittidiAmministratore.Text = ("") Then
MsgBox("Compilare tutti i campi!!!!")
Else

Dim myConnection As SqlConnection

Dim sqlCmd As SqlCommand

myConnection = New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirector y|\Members.mdf;Integrated Security=True;User Instance=True")
myConnection.Open()

sqlCmd = myConnection.CreateCommand

If myConnection IsNot Nothing Then

sqlCmd.CommandText = "Insert into User (Username,Password,Administrator,Nome,Cognome) VALUES (@Username,@Password,@Administrator,@Nome,@Cognome )"

SqlCmd.Parameters.AddWithValue("@Username", TextBoxUtente.Text)
SqlCmd.Parameters.AddWithValue("@Password", TextBoxPassword.Text)
SqlCmd.Parameters.AddWithValue("@Administrator", ComboBoxDirittidiAmministratore.Text)
SqlCmd.Parameters.AddWithValue("@Nome", TextBoxNome.Text)
sqlCmd.Parameters.AddWithValue("@Cognome", TextBoxCognome.Text)

sqlCmd.ExecuteNonQuery()
myConnection.Close()
Me.Close()
End If
End If
End Sub

Non mi scrive niente in sql
sto impazzando sapete darmi un consiglio
Grazie