۱۸ مرداد ۱۳۸۹, ۰۴:۰۴ عصر
ضمن سلام
با استفاده از تابع زیر و فراخونی آن , قادر خواهید بود از باز بودن یک فرم در داخل فایل اکسس مطلع شوید
با استفاده از تابع زیر و فراخونی آن , قادر خواهید بود از باز بودن یک فرم در داخل فایل اکسس مطلع شوید
کد:
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 یک دکمه , عبارت زیر را درج میکنید
نحوه فراخوانی آن هم به صورت زیر میباشد , فرضا در داخل رویداد On Click یک دکمه , عبارت زیر را درج میکنید
کد:
FormIsLoaded("frmSample")