| 導購 | 订阅 | 在线投稿
分享
 
 
 

Visual Basic使用技巧

來源:互聯網  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=1Path&;"\"&1.name

t=Ucase(Right(1name,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=1Path&;"\"&1.name   t=Ucase(Right(1name,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碼均大于零。
󰈣󰈤
 
 
 
>>返回首頁<<
 
 
 
 
 熱帖排行
 
王朝網路微信公眾號
微信掃碼關註本站公眾號 wangchaonetcn
 
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有