Visual Basic 教程.docx

Visual Basic 教程1.Visual Basic是什么　　　　Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言　　　　“Visual” 指的是开发图形用户界面 (GUI) 的发方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可 发　　　　“Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，一种在计算技术发展历史上应用得最为广泛的语言Visual Basic 在原有 BASIC 语言的基础上进一步发展，至今包含了数百条语句、函数及关键词，其中很多和 Windows GUI 有直接关系专业人员可以用 Visual Basic 实现其它任何 Windows 编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序Visual Basic Scripting Edition (VBScript) 是广泛使用的脚本语言，它是 Visual Basic 语言的子集，可嵌入HTML语言中，用于网页设计，如ASP(Active Server Page)文件。

　　　　VB简单易学，通用性强，用途广泛2.VB的功能　　　　VB可以用于可以开发多媒体、数据库、网络、图形等方面的应用程序　　　　　数据访问特性允许对包括 Microsoft SQL Server 和其它企业数据库在内的大部分数据库格式建立数据库和前端应用程序，以及可调整的服务器端部件　　　　　有了 ActiveX™ 技术就可使用其它应用程序提供的功能，例如 Microsoft Word 字处理器，Microsoft Excel 电子数据表及其它 Windows 应用程序　　　　　Internet 能力强大，很容易在应用程序内通过 Internet 或 intranet访问文档和应用程序，或者创建 Internet 服务器应用程序　　　　　已完成的应用程序是使用Visual Basic 虚拟机真正 .exe 文件，可以自由发布3.VB的发展　　　　VB是伴随Windows操作系统而发展的，在中国使用较广的版本有VB4.0、VB5.0、VB6.0　　　　　　VB4.0是为配合WIN95的问世于1995年推出的，既可用于编写WIN3.X平台的16位应用程序也可编写WIN95平台的32位应用程序；VB5.0主要用于编写WIN95平台的32位应用程序，较之VB4.0主要扩展了数据库、ActiveX和Internet方面的功能；VB6.0是与WIN98配合于1998年推出的，进一步加强了数据库、Internet和创建控件方面的功能。

4.VB中的几个常用术语　　　　工程(Project)：是指用于创建一个应用程序的文件的集合　　对象(object)：可控制的某个东西,VB中主要有两类对象:窗体和控件　　窗体(form)：应用程序的用户界面，即windows　　控件(control)：指的是各种按扭、标签、文本框等　　属性(property)：是指对象的特性，如大小、标题或颜色　　　　ActiveX:ActiveX是基于component object model(com)的可视化控件结构的商标名称.它是一种封装技术,提供封装COM组件并将其置入应用程序(如WEB浏览器)的一种方法.Components Object Model (COM)： 是软件组件互相通讯的一种方式它是一种二进制和网络标准，允许任意两个组件互相通讯，而不管它们是在什么计算机上运行(只要计算机是相连的)，不管各计算机运行的是什么操作系统(只要该操作系统支持 COM)，也不管该组件是用什么语言编写的5.VB的系统特性　　　　(1)工程限制　　 　　　1)代码限制：　　 　　　 　　　　可被加载到窗体、类或标准模块的代码总数限于 65,534 行一行代码限于 1023 个字节。

在一行中的实际文本之前最多只能有 256 个空格的前导，在一个逻辑行中最多只能有 25 个续行符 ( _)　　　　　　2)过程、类型和变量　　　　　　　　　对每个模块的过程数没有限制每个过程可包含至多 64K 的代码如果过程或模块超过这一限制，Visual Basic 便产生编译时间错误如果遇到这种错误，可将特别大的过程分割成若干个较小的过程，或将模块级声明移到另一模块，来避免此类错误发生　　　　　　Visual Basic 用表来保存代码中的标识符名(变量、过程、常量等)每个表限于 64K　　　　　3)动态链接库声明表　　　　　　　每个窗体和代码模块使用一个描述动态链接库入口点的结构的表每个结构约 40 个字节，表的大小限于 64K，形成每个模块大约有 1500 个声明　　　　　4)工程名表　　　　　　　整个应用程序用一张包含所有名称的表这些名称包括： 常量名 、 变量名 、 自定义的类型定义名、 模块名、 DLL 过程声明名对工程名表总大小没有限制，但是区分大小写的条目不得超过 32K如果超过了 32K 的限制，可以在不同的模块中重新使用 private 标识符以限制区分大小写的条目数到达 32K。

　　　5)输入表　　　　　　　在不同的模块中每引用一个标识符，便在输入表中创建一个条目每一个这样的入口最小是 24 字节，但限于 64K，这样每个模块大约可以有 2000 个引用　　　　6)模块条目表　　　　　该表中每个模块最多达 125 个字节，但有 64K 的总限制，这样每个工程大约可以产生 400 个模块VB 中的变量名不多于 255 个字符，而窗体、控件、模块和类名不多于 40 个字符　　　　(2)工程文件格式　　　　VB 在创建和编译工程时要产生许多文件，分为：设计时文件、杂项开发文件和运行时文件　　设计时文件是工程的建造块，例如基本模块 (.bas) 和窗体模块 (.frm)　　杂项文件是由 Visual Basic 开发环境中的各种不同的进程和函数产生的，例如打包和展开向导从属文件 (.dep)Visual Basic WinSock控件详细介绍WinSock控件能够通过UDP协议（用户数据报协议）或TCP协议（数据传输协议）连接到远程的机器并进行数据交换这两种协议都能用来创建客户端和服务端应用程序就像定时器控件一样，WinSock控件运行时没有一个可视的界面　　可能的用途　　·创建客户端应用程序，它能在信息到达中央服务器之前把用户的信息收集起来。

　　·创建服务端应用程序，它能作为来自多个用户的数据一个集中处理点　　·创建“聊天”程序　　协议的选择　　当我们使用WinSock控件时，首先要确定的是使用TCP还是UDP协议它们之间主要的区别在于连接状态：　　TCP协议控件是一个基于连接的协议，就像机一样，用户必须在通话之前建立连接；　　UDP是一个无连接的协议，两台计算机之间的事务处理就像传纸条一样：一台计算机向另一台计算机发送消息，但是它们之间并没有一个明确的连接路径另外，发送的单个信息量的大小取决于网络　　通常，你要创建的应用程序的类别就决定了你要选择的协议以下是几个能够帮助你选择合适的协议的问题：　　当发送或接收数据时，该应用程序需要从服务端或客户端获得认证吗？如果要的话，那么TCP协议就正好需要在发送或接受数据前建立明确的连接　　要发送的数据量大吗？（就像图片、声音文件之类）一旦建立了连接，TCP协议就会保持连接并保证数据的完整性但是，这种连接会占用的更多的处理器资源，成本也会更高一些　　数据是陆续传输的，还是一次全部传完呢？比如，如果你要创建的应用程序在某些任务完成时会告知具体的计算机，那么选择UDP协议会更合适一些UDP协议也更适合于发送小量数据。

　　协议的配置　　配置你的应用程序所用到的协议：在设计阶段，单击工具窗口里的协议，选择　　sckTCPProtocol或sckUDPProtocol你也可以在代码里配置协议，就像下面这样：Winsock1.Protocol=sckTCPProtocol　　确定你的计算机名　　要连接到远程的计算机，你必须知道它的IP地址或别名IP地址是一串用句点分隔的3位数字通常，计算机的别名更容易让人记住按下面的步骤可以找到你的计算机名:　　·在“任务栏”里单击“开始”　　·在“设置”选项里单击“控制面板”；　　·双击“网络”图标；　　·单击“网络标识”　　在“计算机名”中显示的就是你的计算机名　　一旦你找到你的计算名，它就可以作为远程主机的属性来用了　　TCP连接入门　　当用TCP控件创建应用程序的时候，必须首先明确你的程序是作为服务端还是客户端创建服务端程序就意味着你的程序能够在指定的端口进行“监听”，而客户端则能够提出请求，服务端能够接受请求并实现连接一旦连接建立起来，客户端和服务端就能够自由地进行通信　　　　创建服务端程序　　下面是创建一个简单服务端程序的步骤：　　·创建一个标准EXE工程；　　·把默认窗体(Default form)的名字改为frmServer;　　·把form的标题（caption）改为TCP Server；　　·把Winsock控件拉到窗体中，并命名为tcpServer；　　在窗体中添加2个文本框，分别命名为txtSendData和txtOutput’在窗体中加入下列代码；Private Sub Form_Load() ’ Set the LocalPort property to an integer. ’ Then invoke the Listen method. tcpServer.LocalPort = 1001 tcpServer.Listen frmClient.Show ’ Show the client form. End Sub Private Sub tcpServer_ConnectionRequest _ (ByVal requestID As Long) ’ Check if the control’s State is closed. If not, ’ close the connection before accepting the new ’ connection. If tcpServer.State <> sckClosed Then _ [Page] tcpServer.Close ’ Accept the request with the requestID ’ parameter. tcpServer.Accept requestID End Sub Private Sub txtSendData_Change() ’ The TextBox control named txtSendData ’ contains the data to be sent. Whenever the user ’ types into the textbox, the string is sent ’ using the SendData method. t。