Temas

yo lo he hecho asi:

creo que es mas facil de entender para los mas inexpertos mi codigo, en lugar que el de m3ll1 (que tambien esta muy bien ehh, vi que m3ll1 habia hecho el ejercicio 3 y dije haber si yo tmb soy kapaz de hacerlo (sin mirar, porsupuesto)

Este es mi codigo:

formulario1:

Código [Seleccionar] Expandir

Private Sub Command1_Click()
On Error Resume Next
If Text2.Text = "" Then
MsgBox "Tienes Que escribir una contraseña", vbInformation, "Introduzca contraseña"
Else
Form2.Show
End If
End Sub


formulario2:

Código [Seleccionar] Expandir

Private Sub Command1_Click()
On Error Resume Next
If Form1.Text2.Text = Form2.txtconfirmada.Text Then
MsgBox "contraseña correcta", vbInformation, "bien hecho"
Else
MsgBox "contraseña incorrecta", vbCritical, "Prueba otra vez"
End If
End Sub

PD: a todo esto komo se hace para que el kodigo salga en blanco komo haceis la mayoria ????

hola, yo se que este ejercicio se hace kon el randomize pero nose de que manera ( y eso que pensaba que era un pijada  ) solo me falta un empujoncito, perdon por mi ignorancia espero que lo komprendais

pos eso, que si tienes tiempo y kieres, pues que pongas las soluciones a los problemas de VB