Imprimir Página - ocultar un form vb

Título: ocultar un form vb
Publicado por: Sai-To en 10 Enero 2008, 05:10 am

saludos gente y disculpen pero bueno esta es mi pregunta si yo muestro un form de una aplicacion y rse form pide una clave y si lan tienes buena, lan clave, se aparezca el otro form.

Ahora como hago para cerrar o esconder el primer form, el que pide lan clave???

Disculpen que los moleste!

Título: Re: ocultar un form vb
Publicado por: CesarTkgo69 en 10 Enero 2008, 05:25 am

Ola viejito,
Se me imagina que es esto:

Código

Private Sub Command1_Click()
if txtUser = "blablaAdmin" And txtPass = "blablaPass" then
' Se ingreso bien el usuario y contraseña entonces
Form2.Show
Me.Hide  ' O !creo¡ que funciona con: Unload Me
Else  ' Si no se cumple entonces
msgbox "Usuario o Contraseña Invalidos",,"Error"
End Sub

Espero que sea eso ;D
Chauuuuz

Título: Re: ocultar un form vb
Publicado por: nhaalclkiemr en 10 Enero 2008, 15:26 pm

Pues ya te pusieron la respuesta...

Ahora como comentario solo decir que si quieres descargar el formulario completamente de memoria despues de ocultarlo tienes que poner:

Código

Set Form2 = Nothing

Saludos ;)

Título: Re: ocultar un form vb
Publicado por: klaususkun en 11 Enero 2008, 01:29 am

yo utilizaba envez de me.hide "el nombre del form".hide justo despues de hacer el show del otro form. claro k esto era en el VBA (visual basic para aplicaciones en concreto word xD)

Citar

Private Sub Command1_Click()
if txtUser = "Admin" And txtPass = "Admin" then
' Se ingreso bien el usuario y contraseña
Form2.Show
Form1.Hide
' Si no se cumple entonces
msgbox "Usuario o Contraseña Invalidos",,"Error"
End Sub

Suponiendo que el form1 es el actual y el form2 el que queremos mostrar si es correcto!

Título: Re: ocultar un form vb
Publicado por: NadiceJMA en 11 Enero 2008, 01:37 am

yo utilizo este

Código:

Private Sub Command1_Click()
if txtUser = "Admin" And txtPass = "Admin" then
' comprueba los datos
Form2.Show
unload me //sabien que form1 o el form dnd estas es el que pide la clave
' de lo contrario
msgbox "Usuario o Contraseña no son correctas",,"Incorrecto"
End Sub

aunque parece que mejor en tu kso usa el form1.hide

Título: Re: ocultar un form vb
Publicado por: marrion en 15 Enero 2008, 13:25 pm

bueno aun que ya hay respuestas yo tb añadiré mi granito!! otra forme es:

Me.hide

ya Me se refiere al mismo formulario

saludos

;D

Título: Re: ocultar un form vb
Publicado por: Syddhartha en 15 Enero 2008, 22:19 pm

Hola, quiero aportar mi manera, principalmente lo haria con una conexion SQL (si quieren explico como) con pass... pero bueno aca tenes una opcion....

Código:

Public Sub Command1_Click()
If Text1.Text = "(contraseña)" Then
Form1.Visible = False
Else
MsgBox "Error, contraseña incorrecta", vbCritical, "Error"
End If
End Sub

Chau . Suerte con tu programa.

PD:¿ Por que ponen nombre de usuario, si lo va a uar el ? Bueno en caso de que me equivoque, disculpadme.

Título: Re: ocultar un form vb
Publicado por: vivachapas en 15 Enero 2008, 22:27 pm

Código:

Private Sub Command1_Click()
If Text1.Text = "la contraseña" Then
Unload Me
Form2.Show
Else
MsgBox "La contraseña es incorrecta", vbCritical
End
End If
End Sub

muchos codes... con eso basta... aparte lo cierra si esta mal.. eso sirve para evitar los generadores de fuerza bruta... (algo de ellos xD xq si abren el programa x cada intento ya nos cago la proteccion xD)

SALUDOS

Título: Re: ocultar un form vb
Publicado por: CamaleonB en 15 Enero 2008, 23:39 pm

Para sacar eso no se necesita fuerza bruta.....Con el w32asm no te da un respiro

salu2

Título: Re: ocultar un form vb
Publicado por: vivachapas en 16 Enero 2008, 00:55 am

jaja no es verdad... hay q encriptarlo y todo eso q ya se hablo en otro tema xD

SALUDOS

Título: Re: ocultar un form vb
Publicado por: Syddhartha en 16 Enero 2008, 05:33 am

Disculpame pero tu codigo

Código:

Private Sub Command1_Click()
If Text1.Text = "la contraseña" Then
Unload Me
Form2.Show
Else
MsgBox "La contraseña es incorrecta", vbCritical
End
End If
End Sub

Me parece (No quiero decir que lo este) esta mal. Si la contraseña es igual a "la contraseña" (o sea la correcta) ¿cierra el programa?.En ese orden no llega mostrar el formulario 2 porque ya cerraste antes de que termine de ejecutar el codigo. Creo que seria haci:

Código:

Private Sub Command1_Click()
If Text1.Text = "la contraseña" Then
Form2.Show
Unload Me
Else
MsgBox "La contraseña es incorrecta", vbCritical
End
End If
End Sub

Si me equivoco disculpame. Chau suerte

Título: Re: ocultar un form vb
Publicado por: cassiani en 16 Enero 2008, 15:37 pm

Citar

Disculpa que te corriga, pero estas equivocado, el programa nunca se cierra, solo el form1 luego se ejecuta la siguiente instrucción mostrando el form2, ¡pruebalo y veras!

De todas formas, tambien podrias cerrar el form1 despues de cargar el form2 y desde alla, ejemplo:

En el form1:

Código:

Private Sub Command1_Click()
    If Text1.Text = "la contraseña" Then
        Form2.Show
    Else
        MsgBox "La contraseña es incorrecta", vbCritical
    End If
End Sub

Y en el form2:

Código:

Private Sub Form_Load()
    Unload Form1
End Sub

Pd: Ya con tantas soluciones, ¡creo que el tio capto la seña!

¡S4lu2!

Título: Re: ocultar un form vb
Publicado por: Syddhartha en 16 Enero 2008, 16:35 pm

Gracias por la correcion, parece que posteo la pregunta y no aparecio mas, en fin por si otro necesita ocultar su form....

Título: Re: ocultar un form vb
Publicado por: NadiceJMA en 17 Enero 2008, 02:42 am

lo que te puedo decir es que lo malo de este tipo de contraseña es que es insegura porque puedes abrir el ejecutable osea el archivo .exe en un bloc de notas, y con pasiciencia encuentras la contraseña entre todo el code, incluso si no me equivoco puedes buscar por ejemplo text1.text y quizas hay este tu pass pero es seguro que la encuentras, asi que mejor encrptala de alguna manera

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Sai-To en 10 Enero 2008, 05:10 am