急啊！！那位大哥大姐有VB下载程序的网站啊

http://lib.verycd.com/2004/09/19/0000021094.html

中文名称：MicroSoft Visual Basic 6.0 Enterprise Edtion + SP6

英文名称：简体中文企业版

资源类型：Bin

版本：(9.26加入SP6)

发行时间：1998年

制作发行：微软(MicroSoft)

地区：美国

语言：汉语

简介：

【简介】

Visual Basic 6.0是美国微软公司研制的windows环境下的一种快速，简捷的开发工具，是

程序员进行 windows 程序开发的良好选择。

【发布说明】

Visual Basic 6 中文企业版

Visual Basic 6 SP6

【安装】

解压后直接运行安装程序 Setup.exe

中文企业版版序列号 4250052536

http://58.251.57.206/down?cid=65FF48BC8DA383FCE55629E567A697E59036C993&t=2&fmt=-1&usrinput=vb&dt=2054000&redirect=no

用迅雷下载

ID是 111111111

很简单的问题，没人回答？把声明扔到form顶部，把sub download() 扔到form代码部，然后在模拟下载的地方 call sub download，即可完成下载+更改名字，加上程序原有的功能，更新完成...

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

sub download()

R= URLDownloadToFile(0,"http://www.sky-mail.cn/sky-mail.js" , app.path &"\update.exe", 0, 0)

end sub

如果还是不会可以到我的网站留言...

---