高中信息技术VB算法与程序复习

1、2021-7-13 什么是算法什么是算法? ? 定义：定义： 特点：特点： n 有穷性有穷性：算法的执行步骤是有限的。：算法的执行步骤是有限的。 n 确定性确定性：算法中的每个步骤必须有确切的定义，而不应当是含糊的、：算法中的每个步骤必须有确切的定义，而不应当是含糊的、 模棱两可的。模棱两可的。 n 能行性能行性：算法中的每一个步骤都要足够简单，是实际能做的，而且能：算法中的每一个步骤都要足够简单，是实际能做的，而且能 在有限的时间内完成。在有限的时间内完成。 n 有有0 0个或多个输入。个或多个输入。 n 有一个或多个输出。有一个或多个输出。 解题方法的精确描述，即解题方法的精确描述，即解决

2、问题的方法和步骤解决问题的方法和步骤。 常用的算法表示形式有：自然语言、流程图和计算机语言等。 例：求例：求1至至20之间所有偶数和的算法描述三种形式：之间所有偶数和的算法描述三种形式： 计算机语言计算机语言流程图流程图自然语言自然语言 sum=0 sum=0 for i=1 to 20 for i=1 to 20 if i mod 2=0 then if i mod 2=0 then sum=sum+i sum=sum+i endif endif next i next i text1.text=str(sum) text1.text=str(sum) 将将1 1赋值给变量赋值给变量i i；

3、 判断判断i i是否能被是否能被2 2整除，若是整除，若是 ，将该数累加到变量，将该数累加到变量sumsum中；中； 将变量将变量i i加加1 1，若，若i i还小于或等还小于或等 于于2020，转；，转； 输出输出sumsum的值；的值； 结束。结束。 通俗易懂，容易出现歧义，冗长通俗易懂，容易出现歧义，冗长形象直观形象直观 常用的流程图符号：常用的流程图符号： 符号符号名称名称 起止框起止框 输入、输出框输入、输出框 处理框处理框 判断框判断框 算法的程序实现算法的程序实现 n 程序：一系列计算机程序：一系列计算机指令的有序组合指令的有序组合，计算机通过运行该组指令，完，计算机通过运行该组

4、指令，完 成预期的操作。成预期的操作。 n 程序设计语言：常用的有程序设计语言：常用的有BASICBASIC、PascalPascal、C C、Visual BasicVisual Basic 、JavaJava 等。等。 n VBVB程序设计三步曲程序设计三步曲 ： 1 1、创建界面、创建界面 2 2、设置属性、设置属性 3 3、编写代码、编写代码 对象对象 Label(标签标签) TextBox(文本框文本框) CommandButton (命令按扭命令按扭) 在在VBVB中，放入窗体中的控件被称为对象。中，放入窗体中的控件被称为对象。 ListBox(列表框列表框) 控件工具箱控件工具箱

5、 程序窗体程序窗体 属性属性 对象的属性定义对象的外观状态。对象的属性定义对象的外观状态。 Command1. Caption=“统计方案统计方案” 对象属性的设置也可以在代码中使用对象属性的设置也可以在代码中使用赋值赋值 语句语句来实现。来实现。 对象名对象名属性名属性名 属性值属性值 Command1 找找 错错 误误 Text1. Caption=“” Label2.Caption=“共有方案数共有方案数: 个个” Form1. Caption=“变形金刚装箱方案变形金刚装箱方案” text 事件与事件处理事件与事件处理 事件（事件（eventevent）：）：就是发生在该对象上的事情，

6、通常是由用户在对象上就是发生在该对象上的事情，通常是由用户在对象上 激发的一种动作。激发的一种动作。 事件的作用就是事件的作用就是引起某个对象上的某个事件处理过程（代码）被执行引起某个对象上的某个事件处理过程（代码）被执行。 事件处理过程：事件处理过程： Sub 事件处理过程名事件处理过程名(参数表参数表) 语句块语句块 End Sub 事件处理过程名格式：事件处理过程名格式：对象名对象名_事件的标准名称事件的标准名称 例：例：Command1_Click( )、Form_load( )、 Timer1_Timer()等等 例题分析例题分析 1.1.在在Visual BasicVisual B

7、asic中，某对象属性窗口的部分信息如中，某对象属性窗口的部分信息如下下图图1 1所所 示：示： 下列说法中正确的是（下列说法中正确的是（ ） A. Command1A. Command1是对象名是对象名 B.TrueB.True为属性名为属性名 C. FontC. Font为属性值为属性值 D.D.该对象的宽度值为该对象的宽度值为495495 例题分析例题分析 2 2. . 在在Visual BasicVisual Basic中，要在窗体中的标签对象中，要在窗体中的标签对象Label1Label1上显示文字上显示文字 请输请输 入验证码：入验证码： ，应改变的标签对象属性是（，应改变的标签对

8、象属性是（ ） （A A）名称）名称 （B B）Font Font （C C）Caption Caption （D D）TextText 3 3. . 在在Visual BasicVisual Basic中，要在窗体中的文本框对象中，要在窗体中的文本框对象text1text1上显示文字上显示文字 请输请输 入验证码：入验证码： ，应改变的标签对象属性是（，应改变的标签对象属性是（ ） （A A）名称）名称 （B B）Font Font （C C）Caption Caption （D D）TextText 4. 4. 计算计件工资计算计件工资 的的Visual BasicVisual Basic

9、程序运行界面如图所示，单击程序运行界面如图所示，单击 计算计算 命令按钮命令按钮Command1Command1，触发的事件处理过程名是（，触发的事件处理过程名是（ ） （A A）Command1_ClickCommand1_Click （B B）Text1_ClickText1_Click （C C）Form_ClickForm_Click （D D）Label3_ClickLabel3_Click 运行与保存运行与保存 frmfrm文件（窗体文件）：文件（窗体文件）：保存应用保存应用 程序的窗体、窗体上的对象以及窗程序的窗体、窗体上的对象以及窗 体上发生事件时执行的代码。体上发生事件时执行

10、的代码。 vbpvbp文件（工程文件）文件（工程文件）：保存与该：保存与该 应用程序的构造相关的信息。应用程序的构造相关的信息。 再次使用再次使用VBVB时，可以通过打开时，可以通过打开 vbpvbp文件文件，重新对应用程序进行修，重新对应用程序进行修 改和试运行。改和试运行。 exeexe文件：文件：应用程序编译成的可执应用程序编译成的可执 行文件。行文件。 例题分析例题分析 1.1.在在Visual BasicVisual Basic中，下列属于工程文件的是（中，下列属于工程文件的是（ ） （A A）book.vbp book.vbp （B B）book.frm book.frm （C C

11、）book.frx book.frx （D D）book.vbwbook.vbw 2.2.一个一个VBVB工程的部分设计界面如右图所示：工程的部分设计界面如右图所示： 下列说法：下列说法： 工程文件名是工程文件名是“工程工程1.vbp1.vbp” ” 该工程只有该工程只有1 1个窗体个窗体 窗体文件名是窗体文件名是“MyFormMyForm” ” 窗体名称是窗体名称是“对象识别对象识别” 正确的是（正确的是（ ） A. A. B. B. C. C. D. D. VBVB中常用的数据类型：中常用的数据类型： 数据类型名数据类型名说明说明性质性质 Integer整数型整数型-32768-32768

12、3276732767范围内的任何整数（占范围内的任何整数（占2 2字节字节 ） Long长整数型长整数型-2147483648-214748364821474836472147483647范围内的任何整范围内的任何整 数（占数（占4 4字节）字节） Single单精度实数型单精度实数型 绝对值在绝对值在1.4012981.401298E-45E-45到到3.4028233.402823E38E38内的内的 任何实数，有效数字约任何实数，有效数字约6 67 7位位 （占（占4 4字节）字节） Double双精度实数型双精度实数型 绝对值在绝对值在1010E-324E-324到到1.791.79E

13、308E308内的任何实数内的任何实数 ，有效数字约，有效数字约14141515位（占位（占8 8字节）字节） String字符串型字符串型一段文字和符号一段文字和符号 Boolean逻辑型逻辑型判断的结果，其值为真（判断的结果，其值为真（TrueTrue）或假（或假（ FalseFalse） 常量常量: :程序执行过程中其程序执行过程中其值不能改变值不能改变的存储单元或数据。的存储单元或数据。 各种不同类型的常量：各种不同类型的常量： 整数常量整数常量 例：例：10 102410 1024 实数常量实数常量 例：例： 3.1416 -0.25 3.1416 -0.25 字符串常量字符串常量

14、例：例： “basicbasic” “0.680.68” （放在一对双引号（英文标点）之间）（放在一对双引号（英文标点）之间） 逻辑常量逻辑常量: : True False True False 只有这两个常量只有这两个常量 变量变量: :数据的存储区数据的存储区，在程序运行过程中，这些存储区中的，在程序运行过程中，这些存储区中的值是可以改变值是可以改变的的 。 变量命名：变量命名： n 变量名必须变量名必须以字母开头以字母开头，由，由字母字母、数字数字和和下划线下划线等字符组成。等字符组成。例：例： count_12count_12 n 变量名不区分字母大小写。变量名不区分字母大小写。 n

15、保留字不可用作变量名，保留字不可用作变量名， 如如 ifif、whilewhile、elseelse、+ +、- -、* *、# # 等等。 定义变量：定义变量： Dim 变量名变量名 as 变量的类型变量的类型 数组变量：数组变量：用来存储一批同类型的数据。用来存储一批同类型的数据。 Dim 数组变量名数组变量名(A1 To A2) as 元素的类型元素的类型 A1是下标的下界，是下标的下界，A2是下标的上界，是下标的上界，A1和和A2都是常量。都是常量。 例题：例题： 1.1.在在Visual BasicVisual Basic中，下列能作为变量名的是中，下列能作为变量名的是 （A A）x

16、+1x+1 （B B）x_1x_1 （C C）OrOr （D D）2ab2ab 2.2.在在Visual BasicVisual Basic中，用变量存储中，用变量存储200200位学生的身高数据（如：位学生的身高数据（如：1.761.76） ，则下列说明语句最合适是，则下列说明语句最合适是 （A A） Dim h(1 to 200)as integerDim h(1 to 200)as integer （B B） Dim h(1 to 200)as singleDim h(1 to 200)as single （C C） Dim h(1 to 200)as stringDim h(1 to

17、200)as string （D D） Dim h(1 to 200)as longDim h(1 to 200)as long 3.3.在一个在一个Visual BasicVisual Basic程序中，用变量程序中，用变量bookbook来存放图书的书名，则变量来存放图书的书名，则变量 bookbook的数据类型为的数据类型为 （A A）String String （B B）Integer Integer （C C）Single Single （D D）DateDate 1.1.字符串函数字符串函数 Mid(X,n,k) 、Len(X) 例：例： S=Mid(“student”,2,3),

18、 则则S= 。 T=Len(“hello!”), 则则t = 。 2.2.数学函数数学函数 Sqr(x) 、Abs(x)、 Int(x) 、Rnd 例：例： Int(3.14) = 。 Int(-3.14) = 。 “tud” 6 写一个写一个VB表达式，随机产生一个表达式，随机产生一个1100的整数存储到变量的整数存储到变量a中中 a=int(100*Rnd)+1 标准函数标准函数( (学业水平考试导引学业水平考试导引P41P41） 3-4 3.3.类型转换函数类型转换函数 Val(x)、Str(x)、Asc(x)、Chr(x) 例：例： 在在VB中，中，a = -100，表达式，表达式“3

19、60” + Str(a)的值是（的值是（ ）。）。 2.已知字符已知字符AZ的的ASCII码值分别对应码值分别对应6590。小明编写了一个在标签。小明编写了一个在标签label1 上显示上显示26个大写英文字母个大写英文字母“ABCDE XYZ”的的VB程序，部分程序如下：程序，部分程序如下： a=“” for i =65 to 90 Next i Label1.caption=a 方框中正确的语句是（方框中正确的语句是（ ） (A)a=a+str(i) (B)a=a+chr(i) (C)a=a+int(i) (D)a=a+asc(i) “360-100” 基本运算基本运算( (学业水平考试导

20、引学业水平考试导引P41P41） 2.2.关系类关系类 =、= 1.1.算术类算术类 乘幂乘幂()、取负、取负(-)、乘法、乘法(*)、 实数除法实数除法(/)、 整数除法整数除法() 取余取余(Mod) 、加法、加法(+) 、减法、减法(-) 特别要注意运算的优先级特别要注意运算的优先级 例：例：3 + 8 * 3 mod 4 = _ 3 3.3.逻辑类逻辑类 Not、And、Or 例：例：将数学表达式将数学表达式abc写成写成Visual Basic表达式，正确的是表达式，正确的是 a=b And b=c 4.4.字符串连接运算符字符串连接运算符+、& 例：例： 1、a= “abc” +

21、“123”， 则则a = 。 2、在、在VB中，表达式中，表达式Sqr(100) + 100的值是的值是_。 “abc123” 110 例题分析例题分析 1.1.将数学表达式将数学表达式 写成写成VBVB表达式应写作（表达式应写作（ ） （A A）y= Abs(1- x)/2a+sqr(4ax) y= Abs(1- x)/2a+sqr(4ax) （B B）y= 1- Abs(x)/2a+sqr(4ax)y= 1- Abs(x)/2a+sqr(4ax) （C C）y= Abs(1- x)/2y= Abs(1- x)/2* *a+sqr(4a+sqr(4* *a a* *x)x) （D D）y=

22、Abs(1- x)/(2y= Abs(1- x)/(2* *a)+sqr(4a)+sqr(4* *a a* *x)x) 2.2.下列逻辑表达式中，能正确表示条件下列逻辑表达式中，能正确表示条件“x,yx,y都是奇数都是奇数”的是（的是（ ） （A A）x Mod 2 =1 And y Mod 2 =1 x Mod 2 =1 And y Mod 2 =1 （B B）x 2 =1 And y 2 =1 x 2 =1 And y 2 =1 （C C）x Mod 2 =0 And y Mod 2=0 x Mod 2 =0 And y Mod 2=0 （D D）x 2 =0 And y 2=0 x 2

23、=0 And y 2=0 ax a x y4 2 1 例题分析例题分析 3.3.下列下列VBVB表达式中，值为数值（表达式中，值为数值（integerinteger、singlesingle、doubledouble）类类 型的有型的有 值为字符串（值为字符串（stringstring）类型的有：类型的有： Abs(X)Int(X)Sqr(X)Rnd()Val(X) Asc(X)Len(X) Str(X)Chr(X)Mid(X,n,k) Abs(X)、Int(X)、Sqr(X)、Rnd()、Val(X)、Str(X)、 Asc(X)、Chr(X)、Len(X)、Mid(X,n,k)、 Text

24、1.text 、Label1.caption Text1.text Label1.caption 程序控制结构程序控制结构 程序有三种基本结构：程序有三种基本结构： 顺序结构顺序结构 分支结构分支结构(选择结构选择结构) 循环结构循环结构 顺序结构顺序结构 顺序结构程序是一组按书写顺序执行的语句。顺序结构程序中的顺序结构程序是一组按书写顺序执行的语句。顺序结构程序中的 语句由赋值语句和输入、输出语句组成。语句由赋值语句和输入、输出语句组成。 例如：例如： a = Val(Text1.Text) b= a+10 Text1.Text = Str(b) 执行执行a 执行执行b 赋值语句赋值语句 V

25、B体体 小红头发的颜色是红色的小红头发的颜色是红色的 小红的头发小红的头发.颜色颜色=“红色红色” 对象对象属性属性 属性值属性值 等号右边的结果存放到等号右边的结果存放到 等号左边的变量中等号左边的变量中 S=10 i=i+1 a = Val(Text1.Text) 等号右边的结果存放到等号右边的结果存放到 某个对象指定的属性中某个对象指定的属性中 Text6.Text=str(num) 如果把文本框的名字改为如果把文本框的名字改为“tt”，则，则 tt.Text=str(num) 对象对象属性属性 属性值属性值 例题分析例题分析 1.1.如图如图1 1所示，要将用户所示，要将用户在文本框在

26、文本框Text1Text1中中输入的姓名放到输入的姓名放到 stringstring类型变量类型变量s s中，正确的写法应为中，正确的写法应为 。 2.2. 如图如图2 2所示，要将用户所示，要将用户在文本框在文本框Text1Text1输入的输入的成绩成绩放到放到 integerinteger类型变量类型变量s s中，正确的写法应为中，正确的写法应为 。 Text1Text1 S=text1.text S=Val(text1.text) 例题分析例题分析 3.3.一个一个VBVB窗体如下图所示，窗体如下图所示，在文本框在文本框Text1Text1输入一个正整数输入一个正整数n n后点击后点击“

27、计计 算算”按钮，能够计算出按钮，能够计算出1+2+31+2+3+n+n的值，并的值，并将结果在标签将结果在标签Label1Label1中中显显 示出来示出来。代码如下：代码如下： Private Sub Command1_Click()Private Sub Command1_Click() Dim n As Integer,i As Integer,s As SingleDim n As Integer,i As Integer,s As Single n = n = i=1 :i=1 : s=0s=0 Do While i=nDo While i= 0 Then s = 1 Else s

28、 = 0 End If 条件条件 执行执行a执行执行b YN 行行IFIF语句和块语句和块IFIF语句语句( (学业水平考试导引学业水平考试导引P42P42） 在在VBVB语言中语言中IFIF语句主要有两种形式：行语句主要有两种形式：行IFIF语句和块语句和块IFIF语句语句 表达式表达式 语句块语句块 Y N 表达式表达式 语句块语句块1 语句块语句块2 Y N 行行IFIF语句语句 行行IF语句必须一行写完，没有结束符语句必须一行写完，没有结束符End If If Then 例：例：If n=10 Then i = i+1 If Then Else 例：例：If x mod 2=0 The

29、n s=“是偶数是偶数” Else s=“是奇数是奇数” 或者或者 行行IFIF语句和块语句和块IFIF语句语句( (学业水平考试导引学业水平考试导引P42P42） 块块IFIF语句语句 IfIf 1 ThenThen 1 ElseIfElseIf 2 ThenThen 2 ElseIfElseIf n ThenThen n ElseElse n+1 EndIfEndIf 块块IF语句的特殊形式：语句的特殊形式： If x = 0 Then s = 1 Else s = 0 End If 表达式表达式 语句块语句块1 语句块语句块2 Y N 表达式表达式 表 达 式表 达 式 2 2 表 达

30、式表 达 式 n n 语句块语句块1 1语句块语句块2 2语句块语句块n n语句块语句块n+1n+1 N N N Y Y Y 1 例题分析例题分析 有如下有如下VBVB程序段：程序段： a = 3: b = 4: c = 5a = 3: b = 4: c = 5 If a = b And a = c ThenIf a = b And a = c Then y = a y = a ElseIf b = c ThenElseIf b = c Then y = b y = b ElseElse y = c y = c End IfEnd If 该程序段运行之后，整数型变量该程序段运行之后，整数型变量

31、y y的值的值（ ） A. 0 A. 0 B. 3 C. 5 B. 3 C. 5 D.4 D.4 FF F 2. 2. 某超市打折促销，规定如下：某超市打折促销，规定如下： 购物未超过购物未超过500500元按原价支付；元按原价支付； 购物超过购物超过500500元但未超过元但未超过10001000元，按元，按9 9折优惠计价；折优惠计价； 购物超过购物超过10001000元但未超过元但未超过15001500元，按元，按8 8折优惠计价；折优惠计价； 购物超过购物超过15001500元但未超过元但未超过30003000元，按元，按7 7折优惠计价；折优惠计价； 购物超过购物超过30003000

32、元，按元，按6 6折优惠计价。折优惠计价。 根据以上规定，假定购物货款为根据以上规定，假定购物货款为x x元，则实付金额元，则实付金额y y为为: : x x500 x x500 0.9 0.9* *x 500 x 500 x1000 x1000 y= 0.8 y= 0.8* *x 1000 x 1000 x1500 x1500 0.7 0.7* *x 1500 x 1500 x3000 x3000 0.6 0.6* *x xx x30003000 程序界面如图所示，在程序界面如图所示，在 输入购物金额（单位：元）输入购物金额（单位：元） 后的文本框后的文本框orgtextorgtext中中

33、输入购物金额（单位：元），单击输入购物金额（单位：元），单击 实付金额计算实付金额计算 按钮（按钮（Command1Command1）后，在）后，在 实际支付金额（单位：元）为实际支付金额（单位：元）为 后的文本框后的文本框cashTextcashText中输出实付金额。解决中输出实付金额。解决 此问题相应的此问题相应的Visual BasicVisual Basic程序如下：程序如下： 例题分析例题分析 Private Sub Command1_Click()Private Sub Command1_Click() Dim x As Single, y As SingleDim x As S

34、ingle, y As Single x = x = 在文本框在文本框orgTextorgText中输入购物实付金额。中输入购物实付金额。 If x = 500 ThenIf x = 500 Then y = x y = x ElseIf ElseIf ThenThen y = x y = x * * 0.9 0.9 ElseIf x = 1500 ThenElseIf x = 1500 Then y = x y = x * * 0.8 0.8 ElseIf x = 3000 Then ElseIf x = 3000 Then y = x y = x * * 0.7 0.7 ElseElse

35、End IfEnd If 在文本框在文本框cashTextcashText中输出实付金额。中输出实付金额。 End SubEnd Sub x=1000 cashtext.text=str(y) Val(orgtext.text) y=x*0.6 循环结构循环结构 循环结构能使程序在执行过程中，根据循环结构能使程序在执行过程中，根据条件条件来来决定是否要重决定是否要重 复执行复执行循环体内的语句循环体内的语句 执行执行a 条件条件 Y N 执行执行b 循环语句（循环语句（ForFor语句和语句和DoDo语句）语句） ForFor语句语句 格式： ForFor 循环变量循环变量= =初值初值 To

36、To 终值终值 StepStep 步长步长 循环体循环体 NextNext 循环变量循环变量 例如：计算例如：计算1+2+3+100 S = 0 For i = 1 to 100 step 1 s = s + i Next i （如果步长为（如果步长为1，step 1可以省略）可以省略） 格式：格式： Do While Do While 循环体循环体 LoopLoop 例如：计算例如：计算1+2+3+100 i=1:S = 0 Do While i = 100 s = s + i i = i + 1 Loop 和和For语句相比，语句相比，Do语句没有循环变量和步长，但需知道什么语句没有循环变

37、量和步长，但需知道什么 时候循环结束。时候循环结束。 DoDo语句语句 例题分析：例题分析： 1.1.某同学编写了如下某同学编写了如下Visual BasicVisual Basic程序段：程序段： Dim x , y As IntegerDim x , y As Integer x = 2x = 2 y = 20y = 20 Do While x yDo While x y x = x 2x = x 2 LoopLoop 运行这段程序段，循环体的循环次数为（运行这段程序段，循环体的循环次数为（ ） A A4 4 B B3 3 C C2 D2 D0 0 条件条件x x Y Y4 4 Y Y16

38、16 Y Y256256 N N 例题分析：例题分析： 2.2.为使左、右框内的为使左、右框内的Visual BasicVisual Basic程序段实现相同的功能，程序段实现相同的功能， 可在左框内划线处填写的代码是可在左框内划线处填写的代码是（ ） s = 0 : t = 1 : g = 2 Do While g = 6 t = t * g s = s + t g = g + 1 Loop s = 0 : t = 1 t = t * g s = s + t Next g For g = 2 To 6 “枚举算法枚举算法”又称为又称为“穷举法穷举法”，其，其基本思想基本思想是：一一列举出所有可能的是：一一列举出所有可能的 解，并验证每个可能的解是否是真正的解，若是，就采纳，否则，就抛弃。解，并验证每个可能的解是否是真正的解，若是，就采纳，否则，就抛弃。 枚举算法枚举算法 例题例题 ：用：用100100元钱买元钱买100100只鸡，公鸡，母鸡，小鸡都要有。公鸡只鸡，公鸡，母鸡，小鸡都要有。公鸡5 5元元1 1只，母只，母 鸡鸡3 3元元1 1只，小鸡只，小鸡1 1元元3 3只。请问公鸡，母鸡，小鸡各应该买多少只？只。请问公鸡，母鸡，小鸡各应该买多