1、Tahoma,8,1341VB 最简单实例入门教程目 录（提示：按 ctrl,并单击鼠标，可以跳到相应页）1.1 1 我们需要 什么 .31.2 2 第二 章：事件 、属性及数据类型 .31.3 3 第 三章：VB 语言 .61.4 4-1 第四章 按钮（ 一） .121.5 4- 第四章 按钮 （二） .191.6 5 第五章 菜单 .271.7 6-1 第六章 输入（一） .341.8 6-2 第六章 输入（二） .421.9 6-3 第六章 输入（三） .521.10 7 第七章 输 出 .59附录 .632.1 VB 教 程 .63Tahoma,8,13421.1 1我们需要什么我们需
2、要什么？当我们在一个精彩的游戏世界中游历了一番之后，或是惊叹于某一工具软件的小巧精致之余，多少总会产生些许编程的冲动。编程吗，在以前如果你对电脑还是一个门外汉，那实在是一件可望而不可及的事情。如果运用基于 DOS 下的编程语言，譬如 C、Qbasic、Pascal 等等，真不知何年何月才能有所成就。编程是需要天赋的，你必须在大脑中对整个程序有一个清晰的轮廓，一个高效的流程，这并不是每个人都能做到的，你必须思之慎之，这也使编程变成一件最枯燥无味的事情。但在第四代计算机语言（可视化编程）出现后，可以确切的说它开发了人们的更多天赋，并不局限于那些头脑异常清晰的人，每一个人都可以发现自己也可以编出一些
3、从前不敢问津的程序，想象力的充分发挥才是第四代语言的精粹。Visual Basic（以下简称 VB）可以说是可视化语言的先驱了，而且它也是可视化程度最高的一个，从几年前 VB 诞生之日起到现在，它已经经历了五个版本，而且现在微软正在紧张的进行着 VB6.0 的研制、测试，这么高的更新率，不外乎说明两个问题：用户对 VB 的热衷，微软对 VB 的重视。不可否认微软对市场的预测能力是极为高明的，而它强大的技术、财力支持也使它在许多以前未进入的领域，在不长的时间内有成为最有力的竞争对手，如 IE 之于浏览器领域，帝国时代之于游戏都是最好的例证。对于 VB 现在也有一个很强的竞争对手Delphi，有人
4、把它称作 VB 杀手，这显然有偏激之处，VB 的确有它的不足之处，但Delphi 又何尝不是呢，而且以微软对 VB 的倾心，VB 的功能必然会越来越强大。VB 的诞生VB 的出现可以说是 Microsoft Windows 的日渐成熟的必然产物。Microsoft Windows 为程序员和最终用户提供了一个共同的人机界面。对用户，Windows 提供了一个图形鼠标的操作环境，该环境对所有的应用程序都一样；对于程序员，Windows 提供了一组预定义工具-称之为 Microsoft Windows 的软件开发工具箱（SDK），该工具能使程序员建立一个与 Windows 界面相同的应用程序，而且
5、，程序员不必关心最终用户的硬件配置情况。在这一开发环境中，程序员唯一困难的是 Microsoft SDK 提供了六百多个函数和与其一致的事件驱动（event-driven）编程技术。两种新方法的交叉使众多的程序员重新陷入困境，程序员不仅要掌握程序驱动编程技术和六百多个函数的功能，而且还得用 C 语言描述这些问题。因此一般情况下，程序员首先要掌握 C 程序设计技术，而后再开始学习 SDK。这样的条件下就要求在 Microsoft 多任务环境下出现一种操作方便，使用简单的新工具Visual Basic 由此诞生。 何为可视 英文 Visual 的意思是“视觉的”，“可视的 Baisc”这个名字可能
6、抽象了点，但实际上它却是最直观的编程方法，之所以叫做“可视”，你只要看到 VB 的界面就会明白，实际上你无需编程，就可以完成许多步骤。在 VB 中引入了控件的概念，在 Windows 中控件的身影无处不在，各种各样的按钮、文本框、无线钮，都是控件的种类，VB 把这些控件模式化，并且每个控件都有若干属性用来控制控件的外观，工作方法。这样你就可以象在画板上一样，随意点几下鼠标，一个按钮就完成了，这些在以前的编程语言下是要经过相当复杂的工作的。Tahoma,8,13431.2 2第二章：事件、属性及数据类型以后两章可能会比较枯燥，但不可否认也很重要，所以为了学好 VB，我们一定要打好基础才行。一、事
7、件通过上一章的例子，你可能对“面向对象的编程”已经有了一定了解，它是由事件驱动的，对于不同的对象，所能感应到的事件也会不同，譬如说当你把鼠标移进某一区域时就会触发 MouseMove 事件，这很直观，也容易理解，但也有些事件比较抽象，下面我来对一般的事件进行一下解释。1. 窗体和图象框类事件 Paint 事件：当某一对象在屏幕中被移动，改变尺寸或清除后，程序会自动调用 Paint 事件。 注意：当对象的 AutoDraw 属性为 True（ 1）时，程序不会调用 Paint 事件。 Resize 事件：当对象的大小改变时触发 Resize 事件。 Load 事件：仅适用于窗体对象，当窗体被装载
8、时运行。 Unload 事件：仅适用于窗体对象，当窗体被卸载时运行。 2.当前光标（Focus）事件 GotFocus 事件：当光标聚焦于该对象时发生事件。 LostFocus 事件：当光标离开该对象时发生事件。 注意： Focus 英文为 “焦点 ”、 “聚焦 ”之意，最直观的例子是，比如有两个窗体，互相有一部分遮盖，当你点下面的窗体时，它就会全部显示出来，这时它处在被激活的状态，并且标题条变成蓝色，这就是 GotFocus 事件，而相反，另外一个窗体被遮盖，并且标题条变灰，称为 LostFocus 事件。上面所说的 “光标 ”并非指鼠标指针。3.鼠标操作事件 Click 事件：鼠标单击对象
9、。 DbClick 事件：鼠标双击事件。 MouseDown、MouseUp 属性：按下/放开鼠标键事件。 MouseMove 事件：鼠标移动事件。 DragDrop 事件：拖放事件，相当于 MouseDown、MouseMove 和 MouseUp 的组合。 DragOver 事件：鼠标在拖放过程中就会产生 DragOver 事件。 4.键盘操作属性 KeyDown、KeyUp 事件：按键的按下/放开事件。 Tahoma,8,1344 KeyPress 事件：按键事件。 5.改变控制项事件 Change 事件：当对象的内容发生改变时，触发 Change 事件。最典型的例子是文本框（TextB
10、ox） 。 DropDown 事件：下弹事件，仅用于组合框（ComboBox）对象。 PathChange 事件：路径改变事件，仅用于文件列表框（FileBox）对象。 6.其他事件 Timer 事件：仅用于计时器，每隔一段时间被触发一次。 二、属性每个对象都有它的属性，并且“Name”属性是共有的，有了“Name”属性才可以在程序中进行调用。对于属性，可以在窗体的布局操作中完成，也可以在程序运行中改变，这取决你的需要，但有些属性是只读的，它只能在控件布局时改变。我将在以后的实例中具体介绍各个属性的作用。 三、数据类型 学过编程的人都知道大多数的计算机语言都规定了各自的数据类型，VB 也不例外
11、。其实，在一个最简单的程序中数据类型是可以不作规定的，也就是说，变量可以使用各种类型，但是在一个复杂的程序里，这样做就很危险，因为很可能给同一个变量赋予了不同的类型，而导致程序出错。所以，为了程序的严谨和便于查看，正确的定义数据类型是必要的。定义数据的另一个原因是，不同的数据占用不同的内存数量，譬如整型（Interger）数据占 2 字节，而长整型数据占 4 个字节，定义合适的数据类型，不管你相信不相信，它可以节省内存！1. VB 常用的数据类型有：整型（Integer，表示-32768 至 32767 之间的整数） 、长整型（Long，表示-2,147,483,648 至 2,147,483
12、,647 之间的整数） 、实型（Single，表示-3.37E+38 至 3.37E+38 之间的实数） 、双精度实型（Double，表示-1.67E+308 至 1.67E+308 之间的实数） ，字符（String，每个字符占一字节，可以储存 065,535 个字符） ，布尔（Boolean，只有两个值 True/-1，或 False/0） 。 2. 数据类型的定义方法： 定义变量最简单的方法是用“Dim”关键字，它的语法： Dim 【 变量名 】As 【 数据类型 】如： Dim Index As Integer也可以在一行中定义多个变量，如：Dim Index As Integer ,
13、 Dim Number As Long把多个变量定义成同一类型可以写成：Tahoma,8,1345Dim Index , Number As Integer 更可以在定义时进行初赋值：Dim Index=有时为了简便，也以符号进行简单的定义，作用是和上面一样的。整型可以用“%”代替，长整型可以用“&”代替，实型可以用“!”，双精度实型可以用“#”定义，如刚才的第一个例子可以写成：Dim Index% 等价于 Dim Index As Integer 对于常量的定义用 Const 定义，如：Const COLOR=。 为了在程序中便于查阅，我们对变量和常量的写法进行规定，变量一般用小写方式，常量
14、则全部大写。注意：使用常量的好处，对于程序中经常出现的数值，应设常量等于它，这样一是书写方便，其二，如果要改变该数值，只需改变定义常量的语句值，而不需改变每个语句，提高了效率。 数组的定义类似于变量定义，所不同的是数组需要指定数组中的元素个数，例如： Dim IntegerArray(99) As Integer这个数组中包含 100 个元素，脚标从 0 到 99。也可以指定脚标的起始值，例如：Dim IntegerArray(2 to 10) As Integer这个数组含有九个元素，脚标从 2 到 10。还可以定义多维数组：Dim ThreeD(4,2 to 5,3 to 6) As In
15、teger上例定义了一个三维数组(444)。 记录的定义 记录定义是把控制权交给用户的方法，它让用户可以定义自己的数据类型，它使用关键字“Type”，方法是：Type 【 数据类型标识符 】As As Tahoma,8,1346As End Type例如，定义一个地址数据：Type AddressStreet As StringZipCode As StringPhone As StringEnd Type这个地址数据里包括三个属性，街区、邮政编码和电话，可以把某数据定义成此类型：Dim MyHome As Address要调用或改变“MyHome”的值时，类似于对对象的属性的操作：变量名 .
16、域名 “”为了简化书写重复的部分,可以用关键字“With”：With MyHome.Street=阜成路 ”.ZipCode=.Phone=End With1.3 3第三章：VB 语言本章提要： VB 语法与 Basic 的异同 注释语句 长语句的分行 条件语句 循环语句 Tahoma,8,1347 运算操作 数据定义与赋值 函数和过程 一、VB 与 Basic VB 之所以叫做“Visual Basic”就是因为它使用了 Basic 语言作为代码，所以它们之间有着千丝万缕的关系，如果学过 Basic 的话，看到 VB 的程序结构会感到很亲切。但 VB 作为新生物，也超越了 Basic 的限制
17、，有了许多自己的特点： VB 建立了一种新的变量类型货币型变量，通过使用仅带有二位小数的货币变量，就能避免因使用实型变量而带来的数值积累误差问题。 VB 在调用函数（Function）时，必须在函数名后跟一对括号。 VB 对白兰地使用范围重新做了规范，在 Basic 里把隐含变量都当作全局变量，而在 VB 里对隐含变量都当作局部变量。 VB 里的说明语句（Declare） ，仅支持动态链结库（DLL ）的子程序和无变量函数。 使用数组，必须事先用 Dim 或 Redim 进行定义。 二、注释语句 在使用注释语句之前必须先了解注释的作用，注释不仅仅是对程序的解释，有时它对于程序的调试也非常有用，
18、譬如说可以利用注释屏蔽一条语句以观察变化，发现问题和错误。以后注释语句将是我们在编程里最经常用到的语句之一。在 VB 里，注释语句有两种，一种是用“Rem”关键字，这跟 DOS 里的批处理文件的用法一样，还有一种是利用单引号“”，例如：Dim a As String 与Rem Dim a As String 的作用是一致的。三、长语句的分行 在比较早的版本中，因为没有象 C 等语言用“；”隔开语句与语句，VB 的语句是必须写在一行里的，不过后来版本的 VB 里如许用分行符“_”把一个长语句分成若干行来存放。四、条件语句如果你学过任何一种编程的话，都会知道在程序里控制其流程的有两种语句，条件与循
19、环，VB 自然也不例外，其实不管哪种语言，条件和循环的样子都差不多，只不过各有各的规矩罢了。Tahoma,8,1348在条件语句里，我们先来学习“IfThen”语句。它的一般语法是：If Then End If与 C 语言不同，VB 的条件语句更符合英语的语法，如果 Then 后面所跟的语句只有一条，可以写成：If Then 而不用 End If。有时我们还会用到If ThenElse End If更可以在 Else 里在嵌套 If 语句，如：If ThenElse If ElseEnd If所有这些可以用一个表格表示：条件 1 True False Tahoma,8,1349条件 2 Tru
20、e False 条件 3 True False 条件 N True False 语句1 语句2 语句 N 语句 N1 用了过多的 Else 后你会感到很不方便，而且程序结构也不清晰，所以大多数的语言还有 Select 语句帮助解决这个问题。VB 里的 Select 语句的格式是这样的：Select Case Case Case Case Case ElseEnd Select例如：Select Case a%Case 1Print “a=Case 2Tahoma,8,13410Print “a=Case ElsePrint “a does not equal to 1 or 2.”End Se
21、lect五、循环语句循环结构是计算机语言里一种重要的结构，它的应用广泛，最简单的例子是累加器的作用，还可以用于穷举法，更直观的例子是把某件事重复指定的次数，这样就不用把要重复的语句输入多次，而通过循环结构完成，非常方便。C 语言里有一个“for”循环语句，VB 里也有“For”关键字，作用也差不多，只是 VB 的“For”语句更容易理解。它的格式是：For = To Step Next 在默认情况下，Step 被设为“1”，可以省略，Step 也可以设为负值，例如：Dim a=For I=1 To 10 a=Next I这是一个最简单的累加器的例子，把 1 到 10 累加在一起，然后赋值给“a”这样的效果和上面是一样的，只不过是倒着加罢了，请看：Dim a=For I=10 To 1 Step 1a=Next IWhile 语句也是一个很常用的循环语句，它的形式很多。 Do While Loop 语句
