elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
29 Mayo 2012, 01:09  


Tema destacado: [Overclocking] Récords de overclock del foro

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo, raul338)
| | |-+  NOVATO con problemas IF
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: NOVATO con problemas IF  (Leído 701 veces)
pica6666

Desconectado Desconectado

Mensajes: 4


Ver Perfil
NOVATO con problemas IF
« en: 17 Agosto 2011, 16:12 »

no me acepta ELSE debajo del form2.label1.text para poner contraseña erronea en un msgbox, aqui dejo el codigo

por cierto me dice "'Else' debe ir precedida de la instrucción 'If' o 'ElseIf' correspondiente"

Gracias


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text = "kikon" And TextBox2.Text = "premio" Then Form2.Show()
        Form2.Label1.Text = "CONTRASEÑA ACEPTADA"
    End Sub


En línea
$Edu$


Conectado Conectado

Mensajes: 1.415



Ver Perfil
Re: NOVATO con problemas IF
« Respuesta #1 en: 17 Agosto 2011, 16:23 »

Eso es porque al poner el Then y la instruccion que sigue todo en una misma linea, no hay q poner End If pero cuando usas else si, entonces hazlo distinto por ejemplo asi:

Código
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
If TextBox1.Text = "kikon" And TextBox2.Text = "premio" Then
       Form2.Show()
  else
       Form2.Label1.Text = "CONTRASEÑA ACEPTADA"
end if
 
   End Sub
 
 

Entiendes?


En línea

Estado en el MSN:
pica6666

Desconectado Desconectado

Mensajes: 4


Ver Perfil
Re: NOVATO con problemas IF
« Respuesta #2 en: 17 Agosto 2011, 16:28 »

pero lo que yo quiero es crear un if y que me diga contraseña aceptada y luego el form2  y SI NO que me diga contraseña incorrecta con un msgbox.
En línea
pica6666

Desconectado Desconectado

Mensajes: 4


Ver Perfil
Re: NOVATO con problemas IF
« Respuesta #3 en: 17 Agosto 2011, 16:35 »

vale ya lo he conseguido, no se que tenia mal pero ya esta, gracias$Edu$
En línea
$Edu$


Conectado Conectado

Mensajes: 1.415



Ver Perfil
Re: NOVATO con problemas IF
« Respuesta #4 en: 17 Agosto 2011, 16:41 »

Ah no lei bien q decia Contraseña Aceptada perdon, mala mia, pero la idea ya la entendiste creo, quedaria asi:

Código
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
If TextBox1.Text = "kikon" And TextBox2.Text = "premio" Then
       Form2.Show()
       Form2.Label1.Text = "CONTRASEÑA ACEPTADA"
 
 else
 
       Form2.Label1.Text = "CONTRASEÑA INCORRECTA"
end if
 
   End Sub
 
 
 

Pero acuerdate que tu error era porque hiciste un if "corto" de una linea, si lo haces "estructurado" no tendras problemas nunca
En línea

Estado en el MSN:
pica6666

Desconectado Desconectado

Mensajes: 4


Ver Perfil
Re: NOVATO con problemas IF
« Respuesta #5 en: 18 Agosto 2011, 20:57 »

Pues estoy empezando con esto, aprendiendo viendo tutoriales y videos del youtube, me recomiendas algun tutorial o manual que conozcas?.

Correcto ese fue mi error, tan simple y corto  era el codigo que acudi al foro, por que me daba rabia no solucionarlo, gracias de nuevo.
En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Novato con problemas en aircrack
Hacking Wireless
tomasin 4 462 Último mensaje 2 Julio 2006, 22:26
por Uxio
novato con problemas en wifislax
Hacking Wireless
consejo 7 937 Último mensaje 12 Marzo 2007, 21:52
por ChimoC
Problemas de novato con el WINAIRODUMP 1_1
Hacking Wireless
El_Drake 3 510 Último mensaje 8 Marzo 2007, 23:27
por the_often
Problemas Programa en C (novato)
Programación C/C++
Xian 3 512 Último mensaje 1 Junio 2007, 20:31
por Diabliyo
[Novato] Problemas en ubuntu T.T
GNU/Linux
RockBand 2 508 Último mensaje 11 Marzo 2008, 00:50
por RockBand
Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines