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: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
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

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