Module1.comando.CommandText = "INSERT INTO registro (Matricula,Nombre,Ap_paterno,Ap_materno,Fecha_nac,Sexo,Foto, Fecha_ing,Id_administrador) VALUES (" & TextMatricula.Text & ",'" & TextNombre.Text & "','" & TextAp.Text & "','" & TextAm.Text & "','" & Fecha_nac.Text & "','" & TextSexo.Text & "','" & img.Image.ToString & "','" & Fecha_ing.Text & "',1)"
        comando.ExecuteNonQuery()
        MsgBox("guardado")