ارسال پاسخ 
 
امتیاز موضوع:
  • 6 رأی - میانگین امتیازات: 3.5
  • 1
  • 2
  • 3
  • 4
  • 5
تشخیص باز بودن یک فرم
نویسنده پیام
CPSD Admin آفلاین
مدیر سایت
*******

ارسال‌ها: 177
تاریخ عضویت: تير ۱۳۸۹
اعتبار: 0
ارسال: #1
تشخیص باز بودن یک فرم
ضمن سلام

با استفاده از تابع زیر و فراخونی آن , قادر خواهید بود از باز بودن یک فرم در داخل فایل اکسس مطلع شوید

کد:
Function FormIsLoaded(ByVal FormName As String) As Boolean
    
    If SysCmd(acSysCmdGetObjectState, acForm, FormName) <> 0 Then
        If Forms(FormName).CurrentView <> 0 Then
            FormIsLoaded = True
        End If
    End If
End Function

این تابع در صورتی که فرم مورد نظر باز باشد مقدار True و در صورت بسته بودن مقدار False را باز خواهد گرداند
نحوه فراخوانی آن هم به صورت زیر میباشد , فرضا در داخل رویداد On Click یک دکمه , عبارت زیر را درج میکنید

کد:
FormIsLoaded("frmSample")

درگاه : وب سايت | فروشگاه | وبلاگ
۱۸ مرداد ۱۳۸۹ ۰۴:۰۴ عصر
مشاهده‌ی وب سایت کاربر یافتن تمامی ارسال‌های این کاربر نقل قول این ارسال در یک پاسخ
ارسال پاسخ 


پرش به انجمن:


‍CPSD.ir Website

وب سايت      |      وبلاگ      |      فروشگاه

 

Center Point SD - Software Developer

Yaldex PopUp