Modificacion de propiedades

Private Sub cmd1_Click()
Lbl1.Caption = "diana mendez"
End Sub