敬业的IT人 互联网 佚名 2008-4-18 11:00:33

Q:--怎样在我的程序中实现文件下载

　　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!

最新文章

由VisualBasic5.0调用Explorer的方法[04-18]

DataGrid控件的使用四[04-18]

将阿拉伯数字转成中文字的程式[04-18]

利用VisualBasic建立快捷方式[04-18]

用VB实现文件查找功能[04-18]

VB创建、修改、删除WIN2K用户[04-18]

相关文章

一组VB应用技巧[04-18]

VisualBasic软件设计中的几个问题[04-18]

在有剪贴板的应用程序间移动数据[04-18]

VB5.0应用程序的启动与退出设计[04-18]

利用VisualBasic设计多媒体应用程序[04-18]

解决VisualBasic的Grid控件的打印问题[04-17]