هاید کردن ساب فرم بعد از کلیک روی فرم

[wolfstander]

سلام
من در فایلی که ضمیمه کرده ام، میخوام وقتی که روی فرم اصلی کلیک میکنم، حالا روی هر باکسی که باشه، ساب فرمم هاید بشه
لزوم این کار هم اینه که در برنامه ام، نزدیک 30 تا تکست باکس دارم که اگه بخوام روی همه اشون رو در اونت On Got Focus
کد هاید رو بذارم، خیلی کار سختی میشه و با توجه به اینکه در چند فرم هم لازمه که این کار رو کنم، مشکل زیادی برام به وجود میام
میخوام اگه زحمتی نیست، راهنمایی کنید که چطور میتونم این اشکال رو رفع کنم

[ARData]

Private Sub Detail_Click()
frm_Sub.Visible = True
End Sub

[wolfstander]

سلام
با تشکر از شما دوست عزیز
اشکال من این بود که توی کلیک روی فرم این پیغام رو میزدم
از شما متشکرم
فقط یه مورد کوچولو مونده، اونم اینکه اگه کاربر روی Detail کلیک نکنه و صاف بره روی یکی از فیلدها، اونوقت ساب فرم کماکان باز خواهد موند
این ایراد رو میشه رفع کرد؟