使用VB WebBrowser获取到网站内容，一个利用 “绿色下载吧” 网站做成的脚本程序，程序还没成熟，时不时有点出错，但还是能运行，本源码不再更新。感谢作者发布，仅供学习参考。If 判断 = 0 Then 　　 搜索 列表源码 　　 一共页数 = Val(一共的页数(列表源码)) 　　 目前页数 = Val(目前的页数(列表源码-Use VB WebBrowser get to the site content, one use of "green download it"