VB編程的好幫手--資源文件

2019-11-18 17:50:02

字體：大中小

來源：轉載

供稿：網友

各位VB高手，你一定也常常因苦于無法組織自己程序中大量的picture，而頭痛不已，那就讓小生為各位介紹一下VB編程的好幫手--資源文件。
所謂資源文件，就是指將在程序運行時用到的資源集中在一起的一個文件。一個資源文件可以包括文字（TEXT）、位圖（BITMAP）。圖標（ICON）等。并且在程序中調用時不用指明路徑，這就簡化了程序的編寫并減少了發生錯誤的可能。現在我就以一個小程序為例講述資源文件的一些使用方法。
這個工程運行后，當點擊【未來】按鈕時中間圖像將依次變換為夏、秋、冬、春……點擊【從前】按鈕則以相反順序轉動圖片（源程序附后）。
首先建立春、夏、秋、冬四幅位圖，均以.BMP格式保存在C:/TEST/下。然后打開記事本編寫資源文件，
內容如下：
100bitmapsPRing.bmp
200bitmapsummer.bmp
300bitmapautumn.bmp
400bitmapwinter.bmp
其中數字表示此項的ID號碼，此號碼很重要，它直接影響調用！BITMAP表示以位圖方式保存而最后的部分為文件名。將此文件保存為TEST.RC。
接下來編譯此資源文件。在C:/VisualBasic/Wizards目錄下找到RC.EXE文件。在MS-DOS方式下鍵人C:/rc/rc:/test.test.rc（鍵入rc/?將會得到幫助），在編譯成功后在C:/TEST/中將發現增加了一個名為TEST.RES的文件。
完成了上面的工作，接下來就可以編寫工程了。首先建立一個image控件img和兩個Command控件cmdc、cmdw。然后建立一個時鐘控件，設其Interval屬性為1000。最后在[通用]中聲明一個名為iid的整形變量：
DimiidAsInteger
并初始化img和iid：
img.Picture=LoadResPicture(100,vbResBitmap)
iid=100
其中LoadResPicture(id,model)為從資源文件中調用圖像的函數，100表示ID號為100的項，vbResBitmap為一常量，值為0，表示以位圖方式打開。然后在兩個Command控件中加入源程序代碼。
最后在工程資源管理器中用鼠標右鍵單擊選擇【添加】-->【添加文件】，加入TEST.RES。
至此工程可謂大功告成，按F5運行一下，希望你會喜歡。還有一點要強調的是一個工程只能有一個工程文件！附源程序：
OptionExplicit
DimiidAsInteger
PrivateSubcomc_Click()
iid=iid-100
Ifiid<100Theniid=400
img.Picture=LoadRespicture(iid.vbResBitmap)
EndIf
EndSub
PrivateSubcomw_Click()
iid=100 iid
Ifiid>400Theniid=100
img.Picture=LoadResPicture(iid,vbResBitmap)
EndIf
EndSub
PrivateSubForm_Load()
img.Picture=LoadResPicture(10O,vbResBitmap)
iid=100
EndSub
PrivateSubTimer1_Timer()
iid=100 iid
Ifiid>400Theniid=100
img.Picture=LoadResPicture(iid,vbResBitmap)
EndIf
EndSub->

上一篇：用VB編寫DirectX7.0游戲（上）

下一篇：截取屏幕圖像