全面分析Visual Basic使用技巧
Visual Basic有很多值得學(xué)習(xí)的地方,這里我們主要介紹Visual Basic使用技巧,包括介紹防止程序被重復(fù)運(yùn)行,用UCase函數(shù)保障文件操作的正確性等方面。看完本文你肯定有不少收獲,希望本文能教會(huì)你更多東西。
Visual Basic使用技巧
1.防止程序被重復(fù)運(yùn)行
如果你不希望你的VB應(yīng)用程序被別人通過(guò)多次雙擊圖標(biāo)而重復(fù)運(yùn)行,導(dǎo)致內(nèi)存不足或其它意外,你可以在程序中增加以下幾行:
- Private Sub Form_ Load
- if appprevinstance then
- msgbox ″程序正在運(yùn)行,請(qǐng)檢查窗口是否被最小化。″
- end if
- End Sub
2.用Ucase函數(shù)保障文件操作的正確性
在WIN32平臺(tái)下,文件名一般為小寫字母,但在WIN95平臺(tái),有時(shí)會(huì)出現(xiàn)大寫。為保障在WIN32平臺(tái)下用VB3開(kāi)發(fā)的涉及到文件操作的程序在WIN95平臺(tái)也能正常工作,可以用Ucase函數(shù)轉(zhuǎn)換文件名的大小寫。例如:在WIN32平臺(tái)下用VB3開(kāi)發(fā)一個(gè)媒體瀏覽器,可以用以下程序段實(shí)現(xiàn)自動(dòng)播放,而不論文件的后綴名為大寫的“ AVI”、“WAV”、 MID”,還是小寫的“ avi”、“wav”、“mid”,還是大小寫混合:
- Sub File1_Click()
- MMcontrol1filename=File1Path&″\″&File1filename
- t=Ucase(Right(File1filename,3))
- If t=″AVI″ Or t=″WAV″ Or t=″MID″ The n
- MMcontrol1Command=″close″
- MMcontrol1Command=″play″
- End if
- End Sub
3.在VB5中漢字的長(zhǎng)度為1而不是2
在VB3中每個(gè)漢字的長(zhǎng)度為2,而在VB4和VB5中每個(gè)漢字的長(zhǎng)度為1。在截取漢字字符串的子串時(shí)需特別引起注意,這種變化對(duì)設(shè)計(jì)漢字的排序、檢索、篩選程序帶來(lái)了較大的方便。另外,在 VB5中漢字的ASCII碼小于0,而在VB3或C++里,漢字的 ASCII碼均大于零。 以上介紹Visual Basic使用技巧。
【編輯推薦】