Creación Inicio De Sesion Vb.Net Y Mysql

Tutorial inicio de sesión con elección de tipo de usuario.

Para comenzar a realizar el inicio de sesión lo primero que realizaremos será crear el formulario como se muestra a continuación.nota: Los nombres de los label los establesco como lb<nombre que represente> ej. si es donde se ingresara el nombre de usuario lbUsuario. lo mismo pasa con los otros controles para los radiobuttomes rb<nombre>, botones bt<nombre>

luego de tener hecho el formulario de ingreso crearemos un modulo de la siguiente manera, para agregar un módulo se va a: Proyecto > Agregar Modulose abrira una ventana seleccionamos la opcion "Modulo" se le coloca el nombre en este caso yo le he puesto moduloConexion y agregar.

'Se importan las referencias de MySql
ImportsMySql.Data.MySqlClient
Imports MySql.Data

Module moduloConexion
'variables globales que pueden ser utilizadas en todo el proyecto. para eso se establecen como "friend"
Friend conexion As New MySqlConnectionFriend SC As New MySqlCommand
Friend DA As New MySqlDataAdapter
Friend DS As New DataSet()
Friend DT As New DataTable

End Module

Una vez listo el modulo procedemos a incluirel código en el formulario de ingreso como se muestra a continuación

Public Class inicio_sesion

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
'Se establece la conexion string a la base de datos MySql
conexion.ConnectionString = "Database=sistreservas;Data Source=localhost;User id=root;password=<aqui va la contraseña de usuario deMySql>"
End Sub

'Al seleccionar algun radiobuttom
Private Sub rbAlumno_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handes rbAlumno.CheckedChanged

IfrbAlumno.Checked = True Then
lbUsuario.Text = "Rut Alumno" 'cambia el texto del label usuario
txtUsuario.Focus() 'Establece el cursor en el texbox usuario
End If...