來源:互聯網網民 2008-06-01 01:10:21
評論1、防止程序被重複運行
假如你不希望你的VB應用程序被別人通過多次雙擊圖標而重複運行，導致內存不足或其它意外，你可以在程序中增加以下幾行：
Private Sub Form_ Load
if app.previnstance then
msgbox "程序正在運行，請檢查窗口是否被最小化。"
end if
End Sub
2、用UCase函數保障文件操作的正確性
在WIN32平台下，文件名一般爲小寫字母，但在WIN95平台，有時會出現大寫。爲保障在WIN32平台下用VB3開發的涉及到文件操作的程序在WIN95平台也能正常工作，可以用Ucase函數轉換文件名的大小寫。例如：在WIN32平台下用VB3開發一個媒體浏覽器，可以用以下程序段實現自動播放，而不論文件的後綴名爲大寫的「 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
3、在VB5中漢字的長度爲1而不是2
在VB3中每個漢字的長度爲2，而在VB4和VB5中每個漢字的長度爲1。在截取漢字字符串的子串時需非凡引起注重，這種變化對設計漢字的排序、檢索、篩選程序帶來了較大的方便。另外，在 VB5中漢字的ASCII碼小于0，而在VB3或C＋＋裏，漢字的 ASCII碼均大于零。
免责声明：本文为网络用户发布，其观点仅代表作者个人观点，与本站无关，本站仅提供信息存储服务。文中陈述内容未经本站证实，其真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
1、防止程序被重複運行
假如你不希望你的VB應用程序被別人通過多次雙擊圖標而重複運行，導致內存不足或其它意外，你可以在程序中增加以下幾行：
Private Sub Form_ Load
if app.previnstance then
msgbox "程序正在運行，請檢查窗口是否被最小化。"
end if
End Sub
2、用UCase函數保障文件操作的正確性
在WIN32平台下，文件名一般爲小寫字母，但在WIN95平台，有時會出現大寫。爲保障在WIN32平台下用VB3開發的涉及到文件操作的程序在WIN95平台也能正常工作，可以用Ucase函數轉換文件名的大小寫。例如：在WIN32平台下用VB3開發一個媒體浏覽器，可以用以下程序段實現自動播放，而不論文件的後綴名爲大寫的「 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
3、在VB5中漢字的長度爲1而不是2
在VB3中每個漢字的長度爲2，而在VB4和VB5中每個漢字的長度爲1。在截取漢字字符串的子串時需非凡引起注重，這種變化對設計漢字的排序、檢索、篩選程序帶來了較大的方便。另外，在 VB5中漢字的ASCII碼小于0，而在VB3或C＋＋裏，漢字的 ASCII碼均大于零。
订阅
