《第三章VB的基本语法》由会员分享，可在线阅读，更多相关《第三章VB的基本语法（44页珍藏版）》请在金锄头文库上搜索。
1、第三章VB的基本语法 3.1 基本数据类型数值型 integerlongsingledoublecurrencybyte字符串类型 string日期类型 date 同时表示日期和时间 dim firstday as date firstday=#99/12/31# firstday=“99/12/31” firstday=“22:30:50”逻辑类型 boolean 逻辑型变量的取值范围只能是true(-1)或false(0)。 Dim switch as boolean switch=true switch=-1这两条赋值语句功能是相同。变体类型 variant 变体型变量是一种十分灵活的变
2、量，可以保存各种类型 的数据。 在定义变量中没有明确指明数据类型时，变量缺省时定义为变体 类型。 dim x dim y as variant 上述两个语句都是定义一个变体变量。对象类型 定义对象变量时，可以直接指明对象的类型。 dim obj1 as commandbutton dim obj2 as textbox 定义了对象变量后，使用set语句为对象变量赋值。 Set obje=command1 obj1.caption=“打开” 修改命令按钮的标题 obj1.fontbold=true用户自定义类型 它类似于C语言中的“结构体”类型的数据。 Type 类型名 元素名 as 类型 元素
3、名 as 类型 元素名 as 类型 end type例：定义一个employee(职工）类型，其中包括职工号、姓名、年 龄。 Type employeeempno as integername as string*10age as integer end typedim emp as emloyee在后面的程序中我们可以用“变量.元素”这样的形式来引用 各个成员。 emp.name=“张三”emp.no=83001 emp.age=21 3.2 变量的声明 在VB中使用一个变量时，可不加任何声明而直接使用，叫做隐式 声明。使用这种方法虽简单，但却不利于程序调试，所以一般对 于变量最好先声明，后
4、使用。设置方式： 在“工具”菜单中选“选项”，在对话框中选“编辑器”，在“ 要求变旦声明”中选中。 dim 变量名 as 数据类型 dim name as string dim sum(3) as integer使用static声明变量 static 变量名 as 数据类型 static a as integer 使用static声明变量为静态变量。它与dim声明的变量不同之处在 于在执行一个过程结束时，过程中所用到的static变量的值会保留 ，下次再调用此过程时，变量的初值是上次调用结束时被子保存 留的值，而dim 声明的变量在过程结束时不保留，每次调用时需 要重新初始化。 3.3 运算符
5、和表达式算术运算符 +-*/（整除）mod关系运算符 =逻辑运算符 notandorxor(逻辑异或） eqv(逻辑等于）3.3 字符串连接运算符 +& c=“abcd” + “ef” c=“abcd” & “ef” 这两式子的运算结果是相同。 但是，由于“+”号同时也是加法运算符，VB又支持变体型的变量 ，所以将加号用做字符串连接运算符有时会引起混淆。因此，在 进行字符串连接时应该 选用“&”操作符而不是“+”操作符。 3.4 基本语句赋值语句 变量名=表达式条件语句 1）if then 语句 2）if then语句组endif3）if then语句组1else语句组2endif (例：ch
6、03 ex3.vbp) 4）if then语句组1else if then语句组2else语句组3endif (例：ch03ex4.vbp)语句组1条件语句组2TF条件1语句组1条件2语句组2语句组3TFTF 多分支语句 select case 变量或表达式case 值1语句组1case 值2语句组2case 值3语句组3case else语句组n end select (例：ch03ex5.vbp) 变量或表达式：可以是整型或字符串表达式 值：是一组用逗号分隔枚举值。（例：编写一个分数等级转换表 分数等级 =90 优=80 良=70 中 =60 及格=60 不及格 x = Val(Text1
7、.Text) Select Case x 10Case 10, 9Text2.Text = “优“Case 8Text2.Text = “良“Case 7Text2.Text = “中“Case 6Text2.Text = “及格“Case 0, 1, 2, 3, 4, 5Text2.Text = “不及格“ End Select转向语句 goto 标号 on 表达式 goto 标号1，标号2，循环语句 1）do while 条件语句体exit do语句体loop 2）do 语句体exit do语句体loop while 条件 条件真时退出循环 3）do until 条件 条件假时执行循环体语
8、句体exit do语句体loop 4）for 循环变量=初值 to 终值 step步长语句体exit for语句体next 循环变量例：（实验书第三章练习三）编写求一元二次方程根。（ch03练习3.vbp) 注：format(numer,fmt) 功能：将数值型量转为字符型量。 Numer：为一个数值型 量。 Fmt：为用户定义格式。 #：显示数字，不在前或后补0。 0：显示数字，在前或后补0 . ：小数点。 ，：千位符。 %：百分比。 例：x=2.33333 format(x, “#.#”) 结果为：2.33 字符串 例：求 1+2+3+100的和 (ch03ex6.vbp) 例：设计一个窗
9、体打印九九乘法表 (ch03ex7.vbp) 例：编写求1*1+2*2+3*3+100*100的和。 Vb常用函数：（见P67)3.5 以对象为核心的程序设计 在VB的程序设计中，对象起着最重要的角色，窗体是一个对象， 每一个放置在窗体上控件也都是对象。由于VB是面向对象的程序 设计语言，它的代码结构与对象有着很大关系，在VB中每一 个窗体和控件都有一些预先定义好了的事件。 例：命令按钮对象，当用户单击命令按钮时，命令按钮对象会产 生click事件。Click事件Private sub command1_click()被驱动执行的程序end sub（单击鼠标左键）对程序而言，可以不处理这个事件
10、，此时这个事件对程序便没有 什么作用。但是如果程序要处理这个事件，该如何进行？因此，如果觉得某个对象的某种事件有进行处理的必要，则以“该对象的名称”与“该事件的名称”定义这个事件程序，如下示：private sub 对象名_事件名（）在此编写希望被驱动执行的程序end sub 将来该对象的这个事件发生时，其对应的事件程序会被驱动。以 后学习每一种对象时，需了解该对象会产生哪些事件和事件发生 时机，这样才能让用户与所编写的程序充分产生交互关系。 了解对象的特性 其实很多对象只要看它的名字，就可以了解它的基本特性。 例如：textbox同时亦可以通过了解对象的属性。懂得控制对象 控制对象的方法不外
11、乎以下两种： 1）设置对象属性 2）调用对象方法其实方法是对象内部的子程序，这种子程序的作用是要求对象执 行某件工作。 例如：很多控件都具有move方法，调用这个方法可让控件移动它 的位置。 查阅“方法” 要了解某一种对象提供了哪些方法，可以打开该 对象的MSDN帮 助文件，再选取“方法”选。 3.6 常用事件在程序设计中应用 事件驱动模式是VB程序的主流，我们必须了解每一种对象会产哪 些事件，以及这些事件产生的时机。随着对象在特性上的差异， 可能产生的事件也会有的不同。下面先介绍一些常用事件，及在 程序设计中应用。 生与灭事件 事件 发生时机 initialize 窗体第一次被装入时 ter
12、minate 窗体最后一次被卸载时 load 窗体每一次被装入时 unload 窗体每一次被卸载时 queryunload 窗体每一次被卸载时Initialize与load事件区别 同样都是发生在窗体被装入时，两者很容易混淆，实际上intialize事 件只有在窗体第一次被装入时发生，而load事件是在窗体每次被装入 时都有发生。 例：打开第三章formlife.vbp 什么程序代码写在intialize或load事件程序？ 1）控件的初始化：几乎都是放在load事件程序中，因为控件会随着 窗体的卸载而一起被清除，所以每次被装入时都要进行初始化。 2）变量的初始化：放在initialize事件
13、程序中居多，因为变量的内容光 焕发不会随着窗体的卸载波而消失。当然，如果希望每次窗体被装入 时都有重新设置变量的内容，就要将变量的初始化放在load事件程序 中。 如何禁止用户使用关闭按钮半闭窗体？ 在unload事件程序中含有一个cancel参数，如果将这个参数设置为true 则窗体就不能关闭。例：在程序中不允许用户通过单击关闭按钮关闭窗体。 Dim switch as boolean form_unloadif not switch thencancel=trueendifend subcommand1_clickswitch=trueunload meend subQueryunload
14、d与unload事件有何区别 queryunload比unload事件先发生。Queryunload事件比unload事件多了一个unloadmode参数unloadmode可以取值 意义vbformcontrolmenu(=0) 用户单击窗体上的关闭按钮vbformcode(=1) unload语句调用vbappwindows(=2) 用户结束windows操作系统 也即可以利用unloadmode参数来判断用户是否用鼠标单击了窗体上的 关闭按钮。借助queryunload事件的参数简化上面的程序。 Private sub command1_click()unload me end sub private sub form_queryunload(cancel as integer,unloadmode as integer)if unloadmode=vbfo
