哪里下载VB编程软件？

有网友提供几个载点,请态樱老试试:

1.Visual Basic 6.0(VB 6.0) with SP6

软件类别： 国外软件 / 编程工具

应用平台： Win2003/ WinXP/ Win2000/ NT/ WinME

下载地址： http://www.97sky.cn/downinfo/472.html

2.Visual Basic 6.0

http://www.ibook8.com/Software/Catalog834/12210.html

http://www.ibook8.com/Software/Catalog834/12121.html

3.太平洋下载或到天极网，华军软件网颂伍,hao123里找找下载。

4.英文帆升版

http://119.147.41.16/down?cid=B47F9461B8D41012D6E0803E104296B270BB6D5D&t=2&fmt=-

祝顺利

在VB中有一个 Winsock 控件，通过它可以实现文件的下载。下面我首先介绍一下该控件的主要属性、基举数方法和事件：

localPor属性：设置本地计算机使用的端口（一般设置为0）；

Protocol属性：设置Winsock控答春件搏首使用的协议，tcP或uDP（一般设置为0）；

remotePort属性：设置要连接的远端计算机端口（80为HttP21为ftP，25为smtP）；

remoteHost 属性：设置用于标识远程计算机的名称（remotePort 属性如果为 80 则设置为“soHu．com”或“sina．com．cn”，如果为 25 则设置为“smtP．21cn．com”）；

connect方法：要求连接到远程计算机；

close方法：关闭连接；

senDData方法：将数据发送给远程计算机；

GetData方法：获取当前的数据块并将其存储在变体类型的变量中；

connect事件：当一个connect *** 作完成时发生；

close事件：当close *** 作完成时发生；

DataarriVal事件：接收数据时发生；

下面我们就来实现文件的下载功能，并以下载搜狐网站的首页为例：

oPtion exPlicit

Dim myall as strinG

PriVate suB form＿loaD

建立连接

Winsock1．Protocol＝0

Winsock1．remoteHost ＝ "soHu．com如果想下载"新浪"首页，则换为 sina．com．cn

Winsock1．remotePort ＝ 80

Winsock1．connect 开始提取数据

enD suB

PriVate suB Winsock1＿connect

Dim strcommanD as strinG

Dim strWeBPaGe as strinG

strWeBPaGe ＝ "Http//WWW．osHu．com/" 指定网页，这里是指搜狐的首页

strcommanD ＝ "Get " ＋ strWeBPaGe ＋ " HttP/1．0" ＋ VBcrlf

strcommanD ＝ strcommanD ＋ "accePt/" ＋ VBcrlf

strcommanD ＝ strcommanD ＋ "accePttext/Html" ＋ VBcrlf

strcommanD ＝ strcommanD ＋ VBcrlf

Winsock1．senDData strcommanD 发送命令

end sub

[riVate suB Winsock1＿DataarriValByVal Bytestotal as lonG

开始下载，收到数据时，发生DataarriVal事件

on error resume next

Dim WebData as strinG

Winsock1．GetData WeBData VBstring myall ＝ myall ＋ WeBData 取得相关的网页文件

enD suB

PriVate suB Winsock1＿close 当下载完成时发生。

自己定义相关的 *** 作

myall 是下载的网页，你可以把它显示在文本框中，也可把它保存为文件，也可通过一些自定义的函数进行信息的提取，限于篇幅，这里就不介绍了。

Winsock1．close 关闭 Winsock

enD suB

到此为止，相信你已了解如何在VB中通过 Winsock 控件下载文件了。本程序在 VB6．0、Win98 环境下运行正常

软件介绍：

vb6.0精简版一款微软推出的rad工具，很多朋友不知道rad是啥，RAD全称：rapid application develop文中意思是快速应用开发，简单来说就是一款计算机编程开发软件。

所需工具：点击下载 vb6.0 精简版

vb6.0精简版特色

1、类型库Win.tlb。->省去大部分的API声明。

2、全部vb6sp5ActiveX控件。->全部vb6sp5ActiveX控件。

3、XP可视设计优化。->XP下在设计模式直接显示XP风格控件。

4、完整卸载功能。->安装、卸载一条龙。

5、EXE特别优化及压缩。->自动压缩exe文件至最小。

初学者的10个编程小技巧

1、如果一行程序太长，能不能换行？

VB的程序代码是允许换行书写的，只要在每次换行的最后一个字符加上换行字符“_”就可以了。例如：

SubPicMove()

Frm.Picture2.Left=Frm.Picture1.Left _’加上换行符

Frm.Picture1.Width

EndSub

2、如何在设计的时候清空存在的图片？

用鼠标点中该图片，在属性窗口中选中Picture属性，按Del键便可清空图片。

3、VisualBasic如何注释一段较长程序代码？

VB注释程序代码的符号是“注释：”，只要在某行程序前面加上“注释：”，就可以注释该行程序。但如果程序代码很长的时候，一行一行地注释令人觉得难以忍受。VB本身提供了这个功能，在主菜单“视图”选项的“工具栏”下，选中Edit，VB的界面会出现一排工具按钮，其中的手形图标按钮后的两个按钮用于“设置注释块”和“解除注释块”。

4、怎么实现鼠标一移上去就出现小提示窗口的功能？

VB里每个控件都有ToolTipText属性，只要加上一行程序就可以了。

例如：Label1.ToolTipText="这是提示！"。

5、如何获得当前软件的运行磁盘目录和命令行参数？

VB里面有个系统对象叫App。App.Path就是当前软件的运行目录。而命令行参数存放在一个系统变量里面，叫Command。程序语句如下：

Label1.Caption=App.Path

Label2.Caption=Command$

6、我想换掉鼠标显示的形状，怎么做？

VB提供的系统控件一般都有MousePointer和MouseIcon属性。我们可以寻找自己喜欢的*.ICO,*.CUR文件，实现的程序如下： Screen.MousePointer=99’用户鼠标类型

Screen.MouseIcon=LoadPicture("C:ABC1.ICO")’读取鼠标的图标文件

7、如何设置程序的错误出口？

OnError语句用于程序的错误出口处理。一般的处理方法有两种：

1)遇到错误跳转到某一行程序去执行，OnErrorGoTosomeline。

例如：

OnErrorGoToERR_LINE

...

Label1.Caption=“正确执行”

ERR_LINE:

... 　

Label1.Caption=“出错了！”

2)遇到错误之后忽略当前错误，继续执行，OnErrorResumeNext。

例如：

OnErrorResumeNext

...

Label1.Caption=“不管对不对都要执行”

...

8、怎样获得键盘输入和判断敲键的Ascii值？

把窗体的KeyPreview属性设置成True，然后在Form_KeyPress事件里编写程序代码如下：

PrivateSubForm_KeyPress(KeyAsciiAsInteger)

Me.Caption=Str(KeyAscii)‘取得键盘输入的字符

...

EndSub

9、我希望窗体一运行就在屏幕的中央，怎么实现？

VB的系统对象Screen记录了当前显示模式的高度和宽度，可以利用这个值来设置窗体的位置。

SubCenterForm(frmAsForm)‘定义过程

frm.Move(Screen.width-frm.width)2,(Screen.Height-frm.Height)2EndSub PrivateSubForm_Load()

CenterFormMe’调用过程

EndSub

10、很多软件都有鼠标在文本框TextBox一按下，就选中所有文字的功能，是怎么实现的？

PrivateSubText1_GotFocus()

Text1.SelStart=0

Text1.SelLength=Len(Text1.Text)’过程调用

EndSub ->

常见问题

一、vb6.0精简版与原版区别?

答：一些不常用的控件和文件都会删掉，例如“帮助文件控件”不同！ 库函数文件会少很多，都是些基本的控件和库函数。 以后越学越多，很多复杂的控件就要用了，精简版没有！ 新手用的都是些基本的，所以觉得没什么区别。

二、VB6.0好学吗？

答：一开始学会觉得难，特别是以前没有学过其他的高级语言，但是只要你坚持下来，不是很难的。

学好VB之后可以再学其他的高级语言，如C、C++，这样就会容易点。好学不好学这要看你用VB来做什么，如果只是应付计算机二级考试，那只需要一个月的时间就可以了，但是如果用它来吃饭，那就要花苦功夫了。

---