¿Cómo Crear un Login Sencillo en Visual Studio 2015?


   Bienvenidos amigos estudiantes de ingeniería, hoy les traigo un vídeo donde creo un sencillo login en Visual Studio 2015, en el área de Visual Basic. El objetivo es responder las siguientes interrogantes:

  1. ¿Cómo se agrega un icono a una pantalla?
  2. ¿Cómo se descarga un icono?
  3. ¿Cómo se hacen comparaciones entre dos strings?
  4. ¿Cómo alertar al usuario cuando no ha ingresado los datos esperados?
  5. ¿Cómo se abre una nueva forma a partir de un botón en otra forma?
  6. ¿Cómo salir del programa haciendo clic en el botón salir?

   Primero, para agregar un icono a una pantalla, hacemos clic derecho en la forma donde se desea cambiar el icono, seguido de propiedades y luego, icon. El archivo de imagen que debemos colocar en esta parte debe ser .ico.

   Segundo, para descargarlo, hacemos una búsqueda en google imágenes, con el nombre del icono y con su extensión. En este caso, se buscaba una llave y he colocado "llave .ico". Abrí la página donde está el icono que me gustaba y lo he descargado. 

   Una vez ubicado en la carpeta de descargas, lo seleccionamos en visual basic. Y como por arte de magia, ya nuestro icono ha cambiado. 

   Ahora bien, para hacer comparaciones entre dos strings, debemos primero asignarles un nombre a cada uno de ellos y al mismo tiempo especificar el tipo de datos con el que estaremos trabajando, en este caso he colocado tipo string, que me abarca el caso en que la contraseña sea "43mayo98" ó "12346" ó "princesabella". 

     " Dim usuario As String = TextBox1.Text
        Dim contraseña As String = TextBox2.Text "

   Si estuvieran los cuadros de texto vacíos tendríamos que hacer un llamado para que el usuario ingrese los datos. Se indica ("") para hacer referencia al vacío. El llamado aparece como una ventana con el texto que le hemos indicado. Para ellos hacemos el siguiente if:

"      If (usuario = "" And contraseña = "") Then
             MsgBox("Ingrese un Usuario y Contraseña")

        End If   "

   Una vez declarado los cuadros de texto como variables, podemos ejecutar un if para realizar la comparación. 

      "  If (usuario = "judith" And contraseña = "123456") Then "

   En este caso por ser un login, necesitamos abrir una nueva pantalla en caso de que sea correcta la contraseña y el usuario. Por ello, se hace vital saber cómo abrir una nueva pantalla a partir de la forma en la que estamos. Lo primero será crear una nueva forma. Seguido de asignarle un nombre nuevo a la forma para poder abrirla en el momento en el que sea necesario. Para el objetivo de este programa, a la forma2 la he llamado formulario.

    " Dim formulario As New Form2 "

Y para que ésta se abra al hacer clic en el botón aceptar, debemos hacer el llamado:

    " formulario.show() "

Si el objetivo fuese cerrar esta pantalla, se utilizaría close().

Pero el botón indica es salir del programa, para ello, hacemos doble clic en el botón salir y le agregamos la palabra end. Este comando, cierra el programa por completo al hacer clic en el botón seleccionado.

El código de la forma1 es el siguiente:

Public Class Form1
    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click

    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim usuario As String = TextBox1.Text
        Dim contraseña As String = TextBox2.Text
        Dim formulario As New Form2

        If (usuario = "" And contraseña = "") Then
            MsgBox("Ingrese un Usuario y Contraseña")
        End If

        If (usuario = "judith" And contraseña = "123456") Then
            formulario.Show()
        End If


    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        End

    End Sub


   De todas maneras, acá les dejo el vídeo completo para que puedan observar otros detalles como lo son: colocarle color de fondo. Cambiar la fuente de las letras. Agregar etiquetas, botones y cuadros de texto. Cambiar el título del programa. Espero por sus comentarios. Estamos para ayudarnos.



Comentarios