文档介绍：第三章顺序结构程序设计
计算机的应用程序一般包含输入数据、计算处理、输出处理结果等三大部分,即先要通过输入操作,向程序输入数据,然后进行应用要求的计算处理,最后通过输出操作,把处理的结果告诉用户或保存在磁盘文件中,供以后查阅。
在本章,我们将介绍Visual Basic实现输入/输出及运算的相关语句、方法和有关的控件,利用这些方法,就可以设计出顺序结构的程序。
赋值语句
在第二章的一些例题中我们用“=”完成了向变量、控件属性赋值的操作,这实际上是赋值语句,是程序最基本、最常用的语句,它的语法格式为:
[Let] 变量名或对象属性名=表达式
说明:
①关键字Let表示赋值,通常可以省略。这里的“=”称为赋值号,其含意是把右边表达式的值,赋给左边的变量名或属性名。
②赋值号“=”右边的表达式可以是算术表达式、字符串表达式、关系表达式或逻辑表达式,计算所得的值将赋值给“=”左边的变量或对象的属性。但必须注意,赋值号两边的数据类型必须一致,或右边表达式的数据类型能自动转换为与左边的变量和属性相同的数据类型,否则会出现图3-1所示的“类型不匹配”的错误。
图3-1 类型不匹配
例如在程序中写出下面两行代码:
Dim x As Integer
x = "12345"
VB能正常执行,因为右为的表达式为数字字符串,赋值操作时,VB系统会自动把数字字符串转换为数值,赋值给左边的整型变量x。
如果把上面的赋值语句改为:
x = "abcde"
程序执行到该行语句时立即报出类型不匹配的错误,因为系统不能把英文字母串转换为数值。
一般来讲,不能将字符串表达式的值赋给数值变量,也不能将数值表达式的值赋给字符串变量。如果这样做,就会在编译时出现错误。
③赋值语句总是先计算右边表达式的值,然后再赋值。表达式中可以含已赋值的变量。
④在VB中的赋值号“=”与数学中的等号具有完全不同的含义,这里要特别注意。例如赋值语句:
x=x+1
表示把变量x的当前值加上1之后,将结果赋给变量x,如果x的当前值为5,执行该赋值语句后,变量x就变为6。而在数学中,x=x+1是不成立的。
例3-1 设计一个程序,查看某年的元旦是星期几。计算某年y的元旦是星期几的算式为:
其中[]表示取整
Mod 7
其中,y为某年公元年号,计算出k为星期几,k=0表示星期天。
设计步骤如下:
⑴创建一个工程,在窗体上添加两个标签(Label1、Label2),两个文本框(Text1、Text2),mand1),程序界面如图3-2所示。
图3-2 例3-1程序的运行情况
⑵设计对象属性。在属性窗口设置各控件的相关属性:
窗体的Caption属性“查元旦星期几”
标签Label1的Caption属性“输入年份”
标签Label2的Caption属性“星期”
文本框Text1的Text属性空白
文本框Text2的Text属性空白
mand1的Caption属性“计算”
⑶编写程序代码。
要求实现功能:用户在文本框Text1中输入年份,单击“计算”按钮后,在文本框Text2中显示计算结果,即星期几。在这里编写命令按钮的单击事件过程:
Private mand1_Click()
Dim y As Integer, f As Integer, k As Integer
y = Val() - 1
f = y + y \ 4 - y \ 100 + y \ 400 + 1
k = f Mod 7
= k
End Sub
运行程序,结果如图3-2所示。
常用基本语句
注释语句Rem
为了提高程序的可读性,通常在程序的适当位置加上必要的注释。在前两章的例题程序中,我们已经使用单撇号(')为程序添加了一些简要的注释。在VB中为程序添加注释的语法格式为:
Rem 注释内容
或
'注释内容
功能:编译器在对程序进行编译时会忽略注释内容,使注释内容对程序没有任何影响。
说明:
①如果使用关键字Rem,在Rem和注释内容之间要加一个空格,在程序中作为一个独立的语句行存在。如果把Rem语句用在其他程序语句之后,必须使用冒号(:)与前面的语句隔开。
②使用注释符号(单撇号')可以直接写在其他语句之后,较使用Rem更为方便,例如:
n = InStr(a, " ") '查找空格位置
b = Left(a, n - 1) '取符串变量a左边部分的n-1个字符
c = Mid(a, n + 1) '取字符串变量a第n+1个字符开始的右边部分
加载对象语句Load
在程序运行的过程中,有时需要添加新的窗