资源描述
单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,主页,第,2,程序设计基础,常量、变量、函数及表达式是构成VB应用程序的基本元素，也是程序设计的重要基础知识。学习和熟悉掌握这些元素，对以后的程序设计是十分重要的。,第2章,程序设计基础,程序中的大部分实际工作是采用程序代码来处理的,任何一门程序设计语言都有一套严格的编程规定,本章主要内容,退出,数据类型,常量与变量,表达式,常用内部函数,2.1,数据类型,在使用计算机来处理数据时，会遇到各种不同类型的数据。例如，一个人的姓名是由一串文本,(,字符,),组成，成绩、年龄和体重都是一个数值，而是否大学毕业则是一个逻辑值，等等。,为了更好地处理各种各样的数据，,VB,定义了多种数据类型,数值型,数据类型 字符型,逻辑型,日期型,对象型,变体型,整数,:,整型/,长整型,字节型,浮点型:单/双精度,货币型,数值型数据,(1)整型(Integer)和长整型(Long),不带小数部分的数，表示正整数、负整数和零 整型数:,-3276832767,长整型数：,-21474836482147483647,(2)字节型(Byte),字节型数可以表示无符号的整数 0255,(3)单精度型(Single)和双精度型(Double),浮点数。表示带有小数部分的数 表示数的范围大，但有误差。如超出某个表示范围，则用科学记数法 例如：,4.53E8(4.5310,8,)，8.173E-14，3.14D23,(4)货币型(Currency),专门为处理货币而设计的数据类型 它可最多保留小数点右边4位和小数点左边15位,其他类型数据,(2),逻辑型数据只有,True,(真),和False,(假),两个值,(3),日期型数据用两个“#”符号把日期和时间的值括起来 如：,#08/20/2001#、#2001-08-20#,(4),变体型,(Variant),数据是一种可变的数据类型，可以存放任何类型的数据，VB会自动完成必要的转换 不特别说明时，VB会自动将该变量默认为Variant型变量 例：Temp=“22”,字符串,Temp=Temp-1,数值,Temp=#01/01/2002#,日期,编写的窗体单击事件过程代码如下：,Private Sub Form_Click(),Dim a As Single,b As Single,c As Single,a=6,b=9,c=Sqr(a*a+b*b),Print c=;c,End Sub,运行程序后单击窗体，输出结果是：,c=10.81665,例2.1,（实验课练习）,已知a=6，b=9，计算c=,例2.1,编写的窗体单击事件过程代码如下：,Private Sub Form_Click(),Dim a As Integer,b As Integer,c As Integer,Randomize,初始化随机数生成器,a=Int(90*Rnd+10),产生10,99区间内的随机整数,b=Int(90*Rnd+10),c=a+b,求两数之和,Print 产生的两个随机数:;a,b,Print 和数:;c,End Sub,运行程序后单击窗体，输出结果是：,产生的两个随机数：56 71,和数：127,例2.2,通过随机函数产生2个两位正整数，求这2个数,之和并显示出来,再次运行程序，单击窗体后输出另一组结果是：,产生的两个随机数：18 37,和数：55,例2.2,用于进行字符串处理,说明：,(1)函数Mid(字符串，p，n),从第P个开始取n个字符,示例：,Mid(“ABCDEG”,3,2),的结果为,”CD”,若省略n，则得到的是从P开始的往后所有字符，如,Mid(“ABCDE”，2),的结果为,“BCDE”,(2)函数,Instr(f,串1,串2,k),查找,串2,在,串1,中的位置,f 和 k 均为可选参数，f表示开始搜索的位置(默认值为1)，k表示比较方式，若k为0(默认)，表示区分大小写；若k为1，则不分大小写。,例如,Instr(3,”,A12a34A56,”,”,A,”,),的结果为,7,Instr(3,”,A12a34A56,”,”,A,”,1),的结果为,4,Instr(,”,A12a34A56,”,”,A,”,),的结果为,1,(3)函数Left,(字符串，n),取左边n个字符,示例:,Left(,”,ABCDE,”,，2),的结果为,”,AB,”,字符串函数,先从字符串a中找出某个指定字符(本例为空格)，再以此字符为界拆分成两个字符串。编写的窗体单击过程代码如下：,Private Sub Form_Click(),Dim a As String,b As String,c As String,n As Integer,a=Visual,Basic,表示空格,n=InStr(a,),查找空格位置,b=Left(a,n-1),取左边部分,c=Mid(a,n+1),取右边部分,Print b,显示左边部分,Print c,显示右边部分,End Sub,程序运行后单击窗体，输出结果是：,Visual Basic,例,2.3,（实验课练习）,使用字符串函数示例,例2.3,处理方法,VisualBasic,先,查找,空格位置,取右边部分,取左边部分,Private Sub Form_Click(),Dim a As String,b As String,c As String,n As Integer,a=“Visual,Basic,”,表示空格,n=InStr(a,“,”),查找空格位置,b=Left(a,n-1),取左边部分,c=,Right(a,_),取右边部分,Print b,显示左边部分,Print c,显示右边部分,End Sub,备注：Right(字符串,n):取字符串右部的n个字符,程序运行后单击窗体，输出结果是：,Visual Basic,若用,Right,函数来代替,Mid,函数,应如何改动？,想一想,思考题,n B.,Len(a)-n,C.,Len(a,),B,日期/时间函数用于进行日期和时间处理,例如：,函数,Date,返回系统日期，如返回日期为#11/03/2001#,函数,Time,返回系统时间，如返回时间为#7:03:28#,2.4.3,日期与时间函数,转换函数用于数据类型的转换,Str(数值表达式)：把数值转换为字符串,Val(字符串)：把字符串转化为数值，忽略字符串中的非数字字符。,使用转换函数的示例,Private Sub Form_Click()x=123,y=123 a=Chr(Asc(x)+5)b=Str(Val(x)+5)c=Val(Str(y)+5)Print a,b,c End Sub,运行程序后单击窗体，输出结果是什么?,备注：Asc(x$):返回字符串x$中第一个字符的ASCII字符,Chr$(x):把x的值转化为相应的ASCII字符。,类型转换函数,想一想,6 128 1235,转换函数例,思考题,在编写程序代码时，要遵守一定的规则。不能超越其规定来自由发挥。,(1),一行写多条语句,。冒号分隔,Sum=Sum+x:Count=Count+1,(2),一条语句写成多行,使用续行符(一个空格后面跟随一个下划线“_”)，将长语句分成多行。例如：,Print Text1.Text&Text2.Text&Text4.Text,_&Left(Text3.Text，3),(3),不区分大小写字母,VB不区分应用程序代码字母的大小写,。,代码书写规则,(4),各关键字之间，关键字和变量名、常量名、过程名之间一定要有空格分隔。,示例：,Private,Sub,Form_Click(),(5)使用缩进,在编写程序代码时，可以使用缩进来反映代码的逻辑结构和嵌套关系。,例如：,Private Sub Form_Click()x=4 If x=1 End If End Sub,(6)严格按照VB规定的格式和符号编写程序。,与其他高级语言一样，在VB中使用的分号、引号、括号等符号都是英文状态下的半角符号，而不能使用中文状态下的全角符号。,许多程序错误都是由此而起,!,例如：,If a5 Then x=10,Print x=;x,不能写成,If a 5 Then x=10,Print “x=”；x,全角符号,全角符号,VB支持结构化的程序设计方法,其程序结构清晰，可读性好，也易于查错和修改 结构化程序设计方法有三种基本控制结构：,顺序结构、选择结构和循环结构,具有,单入口，单出口,的特点,(a)(b)(c),顺序结构 选择结构 循环结构,A,B,假,真,L,E,真,假,A,B,E,结构化程序的基本结构,
展开阅读全文