نحوه نوشتن تابع

[mrhm2000]

با سلام
من تازه کارم و
من می خواستم یک تا بع فاکشن بنویسم چه جوری بنویسم

[aryasoft2872]

شما می نویسی فاکشن طرف اگه یه خورده انگلیسی بلد باشه آب میشه میره زیر زمین حالا ولش کن حتما منظورت فانکشن بوده یه مثال میزنم ببین اگه نیاز به توضیح داشت یا میگم یا هم میگن.
البته فانکشن کاربردهای زیادی داره و بستگی داره می خوای چیکار برای مثال این کدها بررسی می کنه یک فایل یا آدرس وجود داره یا نه؟


Function File_Exists(ByVal PathName As String, Optional Directory As Boolean) As Boolean
If PathName <> "" Then
If IsMissing(Directory) Or Directory = False Then
File_Exists = (Dir$(PathName) <> "")
Else
File_Exists = (Dir$(PathName, vbDirectory) <> "")
End If
End If
End Function

این خطوط او از کاربر دو تا اطلاعات رو میگیره اولیش آدرسه و دومیش می پرسه که مسیره یا نه (یعنی یک فایله یا یک مسیره) بهد میاد اون کاری که باید روش انجام بده تا نیاز کاربر برطرف بشه رو انجام میده یعنی بررسی می کنه که اون فایل یا مسیر وجود داره یا نه اگر وجود داشت فانکشن رو برابر(True(1 و اگر نه هم (0)False می کنه.

[HjSoft]

در ضمن قبل از عبارت Function ميتوني Private ( خاص و مخصوص همان فرم ) , Public ( مشترك بين تمام فرم ها استفاده كني )
در ضمن ميتوني از Sub هم استفاده كني به شرطي كه روي تابع فانكشن برگشتي نداشته باشي