كيف يتم إظهار أو إخفاء مربع نص أو تسمية عن طريق زر أمر واحد

أخي الحبيب:

لنفترض أن لدينا نموذج وبداخله التالي:

مربع نص وليكن بالاسم: Text_1

زر أمر وليكن بالاسم:Cmd_1

1-تريد إخفاء مربع النص

أكتب ما يلي في حدث عند النقر لزر الأمر Cmd_1:

ME.Text_1.Visible=True

2-تريد إظهار مربع النص

أكتب ما يلي في حدث عند النقر لزر الأمر Cmd_1:

ME.Text_1.Visible=False

3-تريد أن تظهر النص"مرحباً" داخل مربع النص:

أكتب ما يلي في حدث عند النقر لزر الأمر Cmd_1:

Me.Text_1.Text = "مرحباً"

وتقبل تحياتي.

الله يعطيك العافية