VisualBasic使用技巧

2019-11-18 17:34:39

字體：大中小

來源：轉載

供稿：網友

1防止程序被重復運行　如果你不希望你的VB應用程序被別人通過多次雙擊圖標而重復運行，導致內存不足或其它意外，你可以在程序中增加以下幾行：

PRivateSubForm_Load

ifappprevinstancethen

msgbox″程序正在運行，請檢查窗口是否被最小化。″

endif

EndSub

2用Ucase函數保障文件操作的正確性　在WIN32平臺下，文件名一般為小寫字母，但在WIN95平臺，有時會出現(xiàn)大寫。為保障在WIN32平臺下用VB3開發(fā)的涉及到文件操作的程序在WIN95平臺也能正常工作，可以用Ucase函數轉換文件名的大小寫。例如：在WIN32平臺下用VB3開發(fā)一個媒體瀏覽器，可以用以下程序段實現(xiàn)自動播放，而不論文件的后綴名為大寫的“AVI”、“WAV”、“MID”，還是小寫的“avi”、“wav”、“mid”，還是大小寫混合：

SubFile1_Click()

MMcontrol1filename=File1Path＆″/″＆File1filename

t=Ucase(Right(File1filename,3))

Ift=″AVI″Ort=″WAV″Ort=″MID″Then

MMcontrol1Command=″close″

MMcontrol1Command=″play″

Endif

EndSub

3在VB5中漢字的長度為1而不是2　在VB3中每個漢字的長度為2，而在VB4和VB5中每個漢字的長度為1。在截取漢字字符串的子串時需特別引起注意，這種變化對設計漢字的排序、檢索、篩選程序帶來了較大的方便。另外，在VB5中漢字的ASCII碼小于0，而在VB3或C＋＋里，漢字的ASCII碼均大于零。->

上一篇：用VB進行移位操作

下一篇：VB中APP對象及其應用