Mensajes

If Not TextBox2.Text = TextBox3.Text Then
            MsgBox("La contraseña no es válida")
            Label6.Text = Val(Label6.Text) - 1
        End If

        If TextBox2.Text = TextBox3.Text Then
            MsgBox("Has ingresado")
            Close()
        End If

buenas estuve mirando el codigo del logueo que me parecio interesante y creo que se puede aortar un poco no se si esta bien por k empece ace poco pero bueno aki ba:

Código [Seleccionar] Expandir

If TextBox2.Text = TextBox3.Text Then
            MsgBox("Has ingresado")
            Close()
            Else
            msgbox ("La contraseña no es valida"
            lavel6.text = val(lavel6.text) - 1
            End if

el ping en batch se suele utilizar para hacer iempo ,para darle mas realismo como si estubiera cargando algo el codigo es el siguiente

Código [Seleccionar] Expandir

@echo off
echo cargando...
ping -n 5 127.0.0.1 > nul
cls
echo operacion completada
pause>nul
exit
bien lo que hace si en comando ping k emos metido es leer las dos lineas y llasta y luego ale pero al poner el comando ping hacemos que espere 5  segundos (fue lo que puese al poner -n 5 despues del ping) y luego lee la siguiente inea es una forma de dar como ya e dicho antes realismo a una aplicacion que agas en bat

Código [Seleccionar] Expandir


start "c:/Ca Librerias TEMP/volver.bat"


Cambia las barras de la ruta / por \
\ son barras de rutas y las otras no por lo k suelen dar problemas