FreeFile .62 اولین شماره ای که برای باز کردن فایل ها آماده باشه (آزاد باشه) رو برمیگردونه.حداکثر هم 255 فایل میتونن باز باشن.
FV .63
GetAllSettings .64 این تابع همه ی تنظیماتی که توی Section و appName ی که بش میدیم ذخیره شده رو به صورت یه آرایه 2 بعدی برمیگردونه.(بهتره اول SaveSetting رو ببینین) ما این مقدار رو توی یه متغیر از نوع Variant قرار میدیم.به طوری که (v(0,0 اسم اولین تنظیممون(یا همون اسم Value توی رجیستری یا همون Key توی تابع SaveSetting) هستش و (v(0,1 مقدار اون تنظیم.به همین ترتیب v(1,0) هم اسم دومین تنظیم میشه... .
GetAttr .65 هم با گرفتن آدرس فایل Attribute های اون فایل رو برمیگردونه.
GetObject .66 شبیه CreateObject کار میکنه با این فرق که نام فایل رو هم میتونه بگیره و معمولا برای ارتباط با برنامه هایی بکار میره که از قبل اجرا شدن ولی CreateObject یه رابط به instance جدید اون Application ایجاد میکنه و وقتی استفاده میشه که نمیدونیم برنامه از قبل اجرا شده یا نه.مثلا میخواهیم یه شی word رو با CreateObject درست کنیم :
Private Sub Command1_Click()
Dim wApp As Object,wDoc as Object
Set wApp = CreateObject("word.application")
Set wDoc = wApp.Documents.Add
wApp.Selection.Font.Name = "verdana"
wApp.Selection.TypeText "Hello!!"
wDoc.SaveAs "D:\w1.doc"
wDoc.Close
Set wDoc = Nothing
Set wApp = Nothing
End Sub
با این کد فایل w1.doc توی درایو ِD ساخته میشه که محتویایش متن Hello!! هستش.به جای CreateObject میشد از GetObject به این صورت استفاده کرد :
Set wApp = GetObject(, "word.application")
چون میخواستیم فایل جدیدی ایجاد کنیم نیاز به دادن آدرس فایل نبود واسه همین فقط آرگومان دوم رو مقدار دهی کردیم.
حالا میخواهیم توی فایلی که درست کردیم یه متن تایپ کنیم.اول اون فایل رو با word باز کنین .اینبار از GetObject استفاده میکنیم :
Private Sub Command1_Click()
Dim wApp As Object
Set wApp = CreateObject("D:\w1.doc").Application
wApp.Documents(1).Application.Selection.TypeText " how are you ?"
Set wApp = Nothing
End Sub
به این صورت ما تونستیم با GetObject با برنامه Word ارتباط برقرار کنیم.
GetSetting .67 با گرفتن appName و Section و Key ، اطلاعاتی رو که با تابع SaveSetting توی رجیستری ذخیره شده رو برمیگردونه(به توضیح SaveSetting توجه کنین) آرگومان چهارم هم مقداریه که اگه اطلاعات مورد نظر توی رجیستری پیدا نشد تابع اون رو برمیگردونه.
Hex .69 (و Hex$) هم با گرفتن یک عدد معادل اون رو به مبنای 16 برمیگردونه مثلا Hex(255) = “FF”
70. Hide فرم رو پنهان میکنه و واسه نشون دادنش باید از Show استفاده کنین (این تابع ها هر دو عضو های Form هستن و اگه توی یه ماژول یا کلاس دارین کد مینویسین باید اسم فرم مورد نظر رو هم بیارین مثلا ()Form1.Hide)
71. Hour زمان رو میگره و ساعت رو از اون استخراج میکنه .مثلا Hour ("19:12:03") = 19
72. IIf یک If…Then…Else یک خطی هستش.آرگومان اول همون عبارتیه که میخواهیم درستیش رو بررسی کنیم.آرگومان دوم و سوم هم مقدار های بازگشتیه تابع هستش.اگه عبارتی که به تابع دادیم درست باشه آرگومان دوم و گرنه آرگومان سوم رو برمیگردونه.مثلا
IIf(2+2 = 4, "Yes", "No") = "Yes"
73. IMEStatus توی ویبی 6 وضعیت Input Method Editor رو برمیگردونه که فقط توی ویندوز های چینی و کره ای و ژاپنی کاربرد داره.
74. InputBox یه Input Box یا همون Prompt رو باز میکنه و یه ورودی از کاربر میگیره.آرگومان اول اون متنی هستش که توی Prompt نشون داده میشه و حتما باید مقدار دهی بشه ولی آرگومان های بعدی اختیاری هستن.
دومی Title یا همون عنوان پنجره Prompt هستش.سومی هم متنیه که به طور پیشفرض توی TextBox ی که توی InputBox هست نمایش داده میشه.2 تا آرگومان بعدی هم مختصات پنجره InputBox هستن.آرگومان بعدی (HelpFile) فایل Help ی که مربوط به این InputBox هستش.بعدی هم Context اون موضوعیه که میخواهین نشون بدین.مقدار برگشتی تابع همون مقداریه که کاربر وارد میکنه اگر هم کاربر Cancel رو بزنه مقدار برگشتی یه رشته خالیه (vbNullString).
75. InStr برای جستجوی یک متن توی یک متن دیگه بکار میره.آرگومان اول جاییه که جستجو توی رشته از اونجا شروع میشه. اگه 1 بگذارین جستجو از اولین کاراکتر شروع میشه میتونین هم مقداری به این آرگومان ندین.دومی رشته ی مبدا هستش یعنی رشته ای که میخواهین توش جستجو کنین.آرگومان بعدی رشته مقصد هست یعنی اون متن ی که میخواهین جستجوش کنین.آرگومان بعدی هم نوع مقایسه هستش.اگه از vbBinaryCompare استفاده کنین بین حروف کوچک و بزرگ تفاوت گذاشته میشه و اون ها مساوی حساب نمیشن (Case Sensitive) اگه از vbTextCompare استفاده کنین حروف بزرگ و کوچک یکی حساب میشن. vbDatabaseCompare هم مربوط به Access هستش و کاری بهش نداریم.مثلا InStr(1,”Visual Basic”,”b”,vbTextCompare) مقدار هشت رو برمیگردونه در صورتی که اگه از vbBinaryCompare استفاده کنین یا اصلا این آرگومان رو مقدار دهی نکنین مقدار 0 نشون داده میشه.یعنی رشته ی مورد نظر پیدا نشد! یا مثلا اگه به جای 1 از 9 استفاده کنین جستجو از حرف نهم یعنی a شروع میشه و چون حرف b بعد از a (منظور دومین a هستش که بعد از b قرار داره) قرار نداره تابع b رو پیدا نمیکنه و مقدار 0 رو برمیگردونه.
این رو هم بگم که ویبی به طور پیشفرض Case Sensitive هستش و حروف بزرگ و کوچک مساوی نیستن یعنی “VB” <> “Vb” اما اگه کد Option Compare Text رو اول کدها(بالای فرم یا ماژول) بزارین این حساسیت ویبی از بین میره.
76. InStrB مثل قبلیه با این فرق که واسه داد های بایتی که توی یک رشته قرار گرفتن استفاده میشه و محل بایت (Byte Position)رو برمیگردونه.مثلا چون یه کاراکتر توی رشته ی معمولی 2 بایت حساب میشه (از لحاظ طول رشته ای 1 هست اما از لحاظ طول بایت 2) مقدار (”InStrB(1,”Visual Basic”,”B برابر 15 هستش.
77. InStrRev مثل InStr هستش با این فرق که جستجو رو از آخرین کاراکتر رشته ی که بش دیدیم شروع میکنه و به اولین کاراکتر میرسه.(برعکس قبلی)آرگومان اول رشته مبدا دومی رشته ی مقصد و سومی هم شروع جستجو هست که به طور پیشفرض -1 هستش یعنی جستجو از آخرین کاراکتر.آرگومان بعدی هم مثل آرگومان آخر InStr.مثلا (”InStrRev(“VisualBasic”,”a برابر 8 هستش نه 5.ولی ( InStrRev("VisualBasic", "a", 7 برابر 5 هستش چون جستجو از حرف B شروع میشه و به سمت اولین کاراکتر میره.
78. Int براکت یک عدد رو برمیگردونه.مثلا Int(2.2) = 2 و Int(-2.2) = -3
