toggle minibrowser 40298
toggle easymove 40186
raise volume by 1% 40058
lower volume by 1% 40059
toggle repeat 40022
toggle shuffle 40023
open jump to time dialog 40193
open jump to file dialog 40194
open skin selector 40219
configure current visualization plug-in 40221
reload the current skin 40291
close winamp 40001
moves back 10 tracks in playlist 40197
show the edit bookmarks 40320
adds current track as a bookmark 40321
play audio cd 40323
load a preset from eq 40253
save a preset to eqf 40254
opens load presets dialog 40172
opens auto-load presets dialog 40173
load default preset 40174
opens save preset dialog 40175
opens auto-load save preset 40176
opens delete preset dialog 40178
opens delete an auto load preset dialog 40180
例程：控制winamp暂停，播放，和跳到下一首音乐
新建一个标准exe工程，加入一个模块，在模块中加入代码----------
option explicit
public declare function findwindow lib "user32" alias "findwindowa" (byval lpclassname as string, byval lpwindowname as string) as long
public declare function sendmessage lib "user32" alias "sendmessagea" (byval hwnd as long, byval wmsg as long, byval wparam as long, lparam as any) as long
const wm_command = &h111
const ipc_winamp_nexttrackbutton = 40048 '跳到下一首音乐
const ipc_winamp_playbutton = 40045 '播放
const ipc_winamp_pauseunpausebutton = 40046 '暂停
public hwndwinamp as long 'winamp的句柄
public sub winampplay() '播放
sendmessage hwndwinamp, wm_command, ipc_winamp_playbutton, 0
end sub
public sub winamppause() '暂停
sendmessage hwndwinamp, wm_command, ipc_winamp_pauseunpausebutton, 0
end sub
public sub winampnext() '跳到下一首音乐
sendmessage hwndwinamp, wm_command, ipc_winamp_nexttrackbutton, 0
end sub
在form中加入的代码----------
option explicit
private sub cmdnext_click()
winampnext '跳到下一首音乐
end sub
private sub cmdpause_click()
winamppause '暂停
end sub
private sub cmdplay_click()
winampplay '播放
end sub
private sub form_load()
hwndwinamp = findwindow("winamp v1.x", vbnullstring) '得到winamp的句柄
