救命丫~~~(編號:2927)

各位高手,請教一個問題:
Private Declare Function SetSystemCursor Lib "user32" (ByVal hCur As Long, ByVal OCR_APPSTARTING As Long) As Long
Private Declare Function LoadCursorFromFile Lib "user32" Alias "LoadCursorFromFileA" (ByVal lpfilename As String) As Long
sub from_load()
Dim hCursor As Long
hCursor=LoadCursorFromFile("C:\windows\cursor\global.ani")
end sub
這是將滑鼠游標設定成動畫游標的程式碼...
可是我在VB6裡頭寫...都沒反應呢...
可以指點一下有什麼問題嗎?
謝謝!!