re:

　　一个例子：一个command，两个text代码如下：

　　　　　privatedeclarefunctiondofiledownloadlib"shdocvw.dll"(byvallpszfileasstring)aslong

　　　privatesubcommand1_click()

　　　　　dimsdownloadasstring

　　　　　sdownload=strconv(text1.text,vbunicode)

　　　　　calldofiledownload(sdownload)

　　　　　endsub

　　　privatesubform_load()

　　　　　text1.text="http://www.chat.ru/~softdaily/fo-ag162.zip"

　　　　　form1.caption="audiograbber1.62full"

　　　　　text2.text="http://www6.50megs.com/audiograbber/demos/cr-ag161.zip"

　　　　　endsub

　　q:--如何在vb中定义一个热键，使得当一个应用程序的窗口最小化后，可以通过热键来唤醒它

　　re:

　　先声明api函数sendmessage，然后添加一个按钮和如下代码；

　　　　　privatedeclarefunctionsendmessagelib"user32"alias"sendmessagea"(byvalhwndaslong,byval_　　　wmsgaslong,byvalwparamaslong,lparamasany)aslong

　　　privatesubcommand1_click()

　　　　　dimwkeyaslong

　　　　　wkey=66

　　　　　x=sendmessage(me.hwnd,wm_sethotkey,wkey,0)

　　　　　msgbox"b键将激活窗体！",64,"定义快捷键"

　　　　　endsub

　　enjoyit!