De la segunda ronda, el primer ejercicio. Haber que les parece y que mejoras se le puede aplicar.
CODE
Option Explicit
Private Sub Form_Load()
crearnombre = ""
crearcontraseña = ""
nombre = ""
contraseña = ""
End Sub
Private Sub Command1_Click()
Dim crearnombre As Variant
Dim crearcontraseña As Variant
End Sub
Private Sub Command2_Click()
Label3 = "No"
If crearnombre = nombre Then
If crearcontraseña = contraseña Then
Label3 = "Si"
End If: End If
End Sub
Si así no es como deberia colgarlo, me avisan y ya busco la forma de ponerlo de otra forma.
EDITO: Aqui esta el enlace, haber que opinan.
http://www.megaupload.com/es/?d=HIDVXD70