dim xmldoc as new msxml.domdocument
dim xmlnode as ixmldomnode
dim root as ixmldomnode
dim node as ixmldomnode
dim xmlele as ixmldomelement
dim xmlatt as ixmldomattribute
dim test as ixmldomnode
dim i as integer
dim song as string
dim path as string
xmldoc.load "f:/songs/songs.xml"
set xmlele = xmldoc.documentelement
set node = xmldoc.selectsinglenode("//song[@songid="+"s"+m_songid+"]")
song = node.childnodes.item(0).text
path = node.childnodes.item(2).text
m_currentsongname = song
m_currentsongpath = path
在VB6中校驗XML文件
xml schema語言是校驗xml文件格式的標準。可以在vb6中使用xml schema來驗證xml的合法性。這個例子演示了怎樣使用microsoft xml parser 4.0來校驗xml檔案。首先，建立一個名為wellformed.xsd的檔案並向其新增如下 然後，建立一個名為wellfor...
vb6中的hook技術
public declare function setwindowshookex lib user32 alias setwindowshookexa byval idhook as long,byval lpfn as long,byval hmod as long,byval dwthreadi...
VB6中模擬按鈕的實現
朋友發來一個 vb6 的小要求 自行繪製按鈕，並且按鈕不能有控制代碼，不得用 image 控制元件，需要支援單擊事件，滑鼠移動上去會變化。感覺像個考試題啊！先貼 思路就是 使用 paintpicture 在窗體上作圖，使用mousemove事件判定滑鼠是否在的位置上，如果是則繪製滑鼠移動浮動後的，否...
VB6中的物件導向（2）
visual basic 是一種視覺化的 物件導向的 object oriented programming，oop 採用事件驅動物件對事件進行處理的程式設計語言。物件導向的程式設計是一種以物件為基礎 以事件驅動物件對事件進行處理的程式設計技術。物件 object 是可以一件事 一個實體 一個名詞，...
VB6中屬性的設定（3）
1 在控制元件佈局時，通過屬性視窗來設定 2 在程式 視窗通過程式設計，執行程式過程中設定屬性的值。開啟屬性視窗的方法 四種 1 選定窗體或窗體中的某個控制元件物件，按下f4 鍵，彈出該物件的屬性視窗。2 選定物件，選擇 檢視 選單中的 屬性視窗 命令。3 選定物件，按滑鼠右鍵，在彈出的 快捷選單 ...