ASP.NET - Problemas para insertar

Hola que tal, estoy tratando de dar de alta nuevos registros en la base de datos, pero cuando doy click en el boton de guardar no me envia mensaje de nada, porque ademas me dice que no es valida la sentencia que ocupo para los mensajes. Aqui pongo mi codigo para que me hagan el favor de revisarlo y me digan en que estoy mal, y como podria hacer para que me funcone:

Sub Guardar(Sender As Object, E as EventArgs)
Page.Validate()
If Not Page.IsValid
Return
End If

Dim DSIn as DataSet
Dim Save as SqlCommand

If idUsuario.Text = "" Or txtuser.Text = "" Or Pass.Text = ""
Message.InnerHtml = "ERROR: Valor Nulo no Válido."
Message.Style("color") = Red
Return
End If

Dim Nuevo as String = "Insert into Usuarios (idUsuario, Usuario," & _
" password, IdGpo) Values (@ID, @Usuario, @Pass, @Gpo)"

Save = New SqlCommand (Nuevo,Conect)

Save.Parameters.Add(New SqlParameter("@ID", SqlDbType.VarChar,5))
Save.Parameters("@ID").Value = idUsuario.Text

Save.Parameters.Add(New SqlParameter("@Usuario", SqlDbType.VarChar,8))
Save.Parameters("@Usuario").Value = txtuser.Text

Save.Parameters.Add(New SqlParameter("@Pass", SqlDbType.VarChar,10))
Save.Parameters("@Pass").Value = Pass.Text

Save.Parameters.Add(New SqlParameter("@Gpo", SqlDbType.VarChar,10))
Save.Parameters("@Gpo").Value = drpGpo.SelectedItem

Save.Connection.Open()

Try
Save.ExecuteNonQuery()
'Message.InnerHtml = "<b>El registro ha sido guardado con éxito</b><br>" & Nuevo.ToString()
Catch Exp As SQLException
If Exp.Number = 2627
'Message.InnerHtml = "ERROR: Ya existe un registro con la misma clave"
Else
'Message.InnerHtml = "ERROR: No se ha podido guardar el registro, verifique la Informacion"
End If
'Message.Style("Color") = "red"
End Try

Save.Connection.Close()

End Sub

Espero me puedan ayudar...de antemano..muchas gracias