Pasar usuario a Label

Saludos Dam, tengo este código en un formulario para en el cual tienen que ingresar clave y susuario y para entrar al formulario userform1, lo que quiero es pasar el usuario a el label27 del userform1. Que le debo de modificar para que funcione??

Dim Strusulabel As String
usuario = TextBox2.Value
clave = TextBox1.Value
If clave = "123" And usuario = "123" Or _
clave = "1" And usuario = "1" Then
Strusulabel = TextBox2.Value
clave3.TextBox2.Value = ""
clave3.TextBox1.Value = ""
clave3.Hide
Userform1.Show
Userform1.Label27 = Strusulabel

1 Respuesta

Respuesta
1

Dentro del userform1, pon lo siguiente

Private Sub UserForm_activate()
UserForm1.Label27 = UserForm2.TextBox2
End Sub

Cambia UserForm2 por el nombre de tu userform donde capturas el usuario

No es necesaria la variable Strusulabel

Saludos. Dam

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas