Problemas con un commandbutton

Iniciado por Banker25, 14 Abril 2008, 23:00 PM

0 Miembros y 1 Visitante están viendo este tema.

Banker25


hola que tal tengo un problema con un commandbutton estoy haciendo un proyecto que tienes 6 formularios pero la pantalla principal de bienvenidos tienes y texbot y un commandbutton para registrar la contraseña.

yo quisiera saber como hacer para que cuando ingrese los numero o letrar o codigos en el textbot y darle clic en el commandbutton me ejecute un mensaje que diga su codigo o contraseña es invalida o su contaseña es correcta y pase a la otra pantalla

naderST

en el evento Click del CommandButton pones una condición con If y luego un MsgBox

Banker25

Cita de: naderST en 14 Abril 2008, 23:43 PM
en el evento Click del CommandButton pones una condición con If y luego un MsgBox
a esta bien y  mas nada hay que colocarle

por ejemplo
if msgbox "Contraseña Incorrecta"

Ch3ck

#3
Nó, debes colocar

If Text1.text = "hola" then 'Donde Text1 es donde pones el Pass...
msgbox "Contraseña Correcta"
Else
MsgBox "Contraseña Incorrecta"
End if


Agrega las funciones que quieras al codigo...

Saludos!!!!

Banker25

Cita de: Ch3ckM4t3r en 15 Abril 2008, 00:49 AM
Nó, debes colocar

If Text1.text = "hola" then 'Donde Text1 es donde pones el Pass...
msgbox "Contraseña Correcta"
Else
MsgBox "Contraseña Incorrecta"
End if


Agrega las funciones que quieras al codigo...

Saludos!!!!


Gracias por el aporte en verda necesita va ayuda porque esta confundido

((( SPAWN )))

#5
Hola, aparte de verificar si la contraseña escrita es correcta, deberias comprobar q el usuario no ingrese una cadena vacía por ejemplo:


Private Sub Command1_Click()
    If Text1 = "" Then
        MsgBox "Ingrese una contraseña válida"
    End If
End Sub


o si se trata de un textbox q solamente ingresá numeros y el usuario ingresa letras podes comprobar el ingreso de esta forma:


Private Sub Command1_Click()
    If Not IsNumeric(Text1) Then
        MsgBox "Ingrese únicamente números"
    End If
End Sub


en el caso de q solamente se ingrese texto y el usuario ingrese números hace lo mismo q lo anterior pero sin el Not:


Private Sub Command1_Click()
    If IsNumeric(Text1) Then
        MsgBox "Ingrese únicamente letras"
    End If
End Sub


Hay varias formas de verificación queda despues a tu elección.
Saludos.

Cita de: EON + = SOLUCIÓN

Banker25

Cita de: ((( SPAWN ))) en 15 Abril 2008, 06:39 AM
Hola, aparte de verificar si la contraseña escrita es correcta, deberias comprobar q el usuario no ingrese una cadena vacía por ejemplo:


Private Sub Command1_Click()
    If Text1 = "" Then
        MsgBox "Ingrese una contraseña válida"
    End If
End Sub


o si se trata de un textbox q solamente ingresá numeros y el usuario ingresa letras podes comprobar el ingreso de esta forma:


Private Sub Command1_Click()
    If Not IsNumeric(Text1) Then
        MsgBox "Ingrese únicamente números"
    End If
End Sub


en el caso de q solamente se ingrese texto y el usuario ingrese números hace lo mismo q lo anterior pero sin el Not:


Private Sub Command1_Click()
    If IsNumeric(Text1) Then
        MsgBox "Ingrese únicamente letras"
    End If
End Sub


Hay varias formas de verificación queda despues a tu elección.
Saludos.

Esta bien y en el textbox que codigos tengo que ingresar

seba123neo

en el textbox no va nada...la validacion se hace a travez del click del boton...lo unico podria ser ponerle la propiedad PasswordChar cone el caracter • ,para qeu no se vea la contraseña ingresada,como hace el messenger...

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

((( SPAWN )))

Hola, en el textbox ingresas la contraseña cuando el programa esta en ejecucion, para q despues se ejecute el evento click del boton y se comprube, tanto el tipo de ingreso como la contraseña misma, y le pones en la propiedad PasswordChar el caracter "* "por q creo q el caracter "•" lo toma asi -> "|"
Saludos.

Cita de: EON + = SOLUCIÓN

seba123neo

eso se soluciona poniendo la fuente del textbox en "WINGDINGS" y despues poniendo como passwordchar la letra "L"......
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson