[ تمت الإجابة ]هل يوجد طريقة لعمل زر لأخفاء واظهار مربع نص بنفس النموذج ..؟

وعليكــم السـلام ورحمة الله وبركاتـه..

استخدم هذه الشفرة

If Me.cmd.Caption = "اخفاء" Then
Me.txt.Visible = False
Me.cmd.Caption = "اظهار"
ElseIf Me.cmd.Caption = "اظهار" Then
Me.txt.Visible = True
Me.cmd.Caption = "اخفاء"
End If

واليك المثال التطبيقي التالي

EkseerVis.rar

جزاك الله خيرا اخي الكريم ...

بارك الله فيكم ، وجاري العمـل عليهـا ..