ActiveForm و ActiveControl چيست و چگونه بايد اينها رو تنظيم كرد ؟

[morynf]

دوستان عزيز لطفا بگيد ActiveForm و ActiveControl چيست و چگونه بايد اينها رو تنظيم كرد ؟ و معمولا كجا بكار مي ره و چطوري و در تنظيم با Screen.ActiveForm چطور استفاده مي شوند .
با تشكر

[e601]

با سلام
دوست عزیز ActiveForm نام فرمی که فوکوس رو در برنامه در اختیار داره بر میگردنه و AcvtiveControl هم همونجوری که از نام اون پیداست نام کنترلی که در لحظه فراخوانی این دستور فوکوس برنامه رو در اختیار داره برمیگردونه.
از اینگونه خصوصیتها میتوان در مواردی که چند فرم بصورت همزمان در برنامه باز هست استفاده کرد و مثلا تعیین کرد اگر کاربر فلان فرم رو انتخاب کرد فلان کار رو انجام بده...
بیشتر برای تعیین فوکوس برنامه استفاده میشه بستگی به کار شما هم داره اگه بیشتر توضیح بدید بهتر میتونم راهنمایی کنم ولی به هر حال کد زیر نحوه استفاده از ActiveForm رو به شما نشون میده



Private Sub Command0_Click()
Dim frm As Form
Set frm = Screen.ActiveForm
MsgBox "فرم فعال در حال حاضر" & frm.Name & "میباشد"
End Sub

در این کد ابتدا یک متغیر از نوع فرم تعریف میشه و در خط دوم فرم فعال یا همون ActiveForm برابر با اون قرار داده میشه و در خط سوم با استفاده از خصوصیت Name نام فرم فعال برنامه با یک پیغام نمایش داده میشه

موفق باشید...