1、防止程序被重復運行 假如你不希望你的VB應用程序被別人通過多次雙擊圖標而重復運行，導致內(nèi)存不足或其它意外，你可以在程序中增加以下幾行： PRivate Sub Form_ Load if app.previnstance then msgbox "程序正在運行，請檢查窗口是否被最小化。" end if End Sub
2、用UCase函數(shù)保障文件操作的正確性 在WIN32平臺下，文件名一般為小寫字母，但在WIN95平臺，有時會出現(xiàn)大寫。為保障在WIN32平臺下用VB3開發(fā)的涉及到文件操作的程序在WIN95平臺也能正常工作，可以用Ucase函數(shù)轉換文件名的大小寫。例如：在WIN32平臺下用VB3開發(fā)一個媒體瀏覽器，可以用以下程序段實現(xiàn)自動播放，而不論文件的后綴名為大寫的“ AVI”、“WAV”、“MID”，還是小寫的“ avi”、“wav”、“mid”，還是大小寫混合： Sub 1_Click() MMcontrol1.name=1Path&；"/"&1.name t=Ucase(Right(1name,3)) If t="VI" Or t="WAV" Or t="MID" Then MMcontrol1.Command="close" MMcontrol1.Command="play" End if End Sub
