《算法与程序设计》知识点

1、高息技术算法与程序设计 VB （选修）知识要点相关知识点（一）算法1. 定义相关题解：算法：就是解决问题的方法和步骤。算法是程序设计的“灵魂”，算法+数据结构=程序。单选题1、运用计算机程序解决实际问题时，合理的步骤是（）。A、设计算法分析问题编写程序调试程序B、分析问题设计算法编写程序调试程序C、分析问题编写程序设计算法调试程序D、设计算法编写程序分析问题调试程序2 .算法的描述方法：算法的描述：可分多种表达方法，一般用自然语言、流程图和伪代码进行描述。自然语言描述法：指用人们日常生活中使用的语言（本国语言），用自然语言描述符合我们的习惯，且容易理解。流程图描述：也称程序框图，它是算法的一种

2、图形化表示方法。且描述算法形象、直观，更易 理解。伪代码描述法： 是介于自然语言和计算机程序语言之间的一种算法描述。是专业软件开发人员 常用方法。开始或结束输入或输出处理或运算（）程序设计基础常用高级编程语言：BASIC、VB、Pascal、C、C+、JaVa面向对象的程序设计语言： 其中的对象主要是系统设计好的对象，包括窗体等、控件等 控件：是指工具箱中的工具在窗体中画出的、能实现一定功能的部件，如文本框，命令按钮常用控件控件对象的类型名子举例窗体FormForm1命令按钮Comma nd butt OnComma nd1标签LabelLabel1文本框TeXtBOXText1对象的属性、方

3、法和事件1、属性属性Name设置对象的名称CaPti On决定控件中显示的容（文字）TeXt决定窗体中文本框中显示的容（初始为空白）Height决定控件高度Width决定控件宽度TOP决定控件的靠顶部位置Left决疋控件的靠左边位置Font设置控件中字体格式BackColor设置控件背景色ForeColor设置控件的前景色BOrderStyIe设置控件的边框风格ViSibIe决定控件是否可见En abled决定控件运行时是否有效对象名.属性名=属性值对象中属性可以在设计界面时通过属性窗中设置，也可以在运行时通过程序代码设置，方法如下例：给文本框“ Txt123 ”的TeXt ”属性赋值为字符串

4、20 ”，代码如下Txt123.text = ”20”变量=对象名.属性名如果要获取对象的状态或特性，这时就要读取对象的属性值，方法如下 例：读取文本框“ txt123 ”的TeXt ”属性的代码如下a = txt123.text'读取字符（或 a=Val（txt123.text）'读取数值2、方法对象.方法参数名表例：form.print"欢迎使用”该语句使用Print方法在form1窗体中显示字符串"欢迎使用”3、事件及事件驱动事件是对象对外部操作的响应，如在程序执行时，单击命令按钮会产生一个 Click事件。如需要命令按钮响应 Click事件，就把完成

5、Click事件功能的代码写到 Click事件的事件过程中， 与 事件对应。事件过程的形式如下：PriVate SUb 对象_事件名（）（事件过程代码）End SUb一个简单的VB程序 求圆的周长和面积Word资料PriVate SUb Comma nd1_Click()Dim r AS Single'定义r为单精度型Dim C AS Single'定义C为单精度型Dim S AS Single'定义S为单精度型r = VaI（TeXt1.Text）'输入半径r,变量r为数值型，因此输入语句必须加函数Val（）C = 2 * 3.14159 * r '计算

6、周长S = 3.14159 * r * r'计算面积Text2.Text =Str(C)Text3.Text = Str(S)输出周长'输出面积，变量S为数值型，因此输出语句必须加函数str（）End SUbPriVate SUb Comma nd2_Click()End'退出End SUb（三）、常量：在程序进行过程中不变的量。在VB中一般分数值常量与字符常量两种数值常量：就是数学中说的常数，分 整型常量和实型常量 两种整型常量：即整数，指不带小数点的数值如1、0、-10、+35等都是合法的整数实型常量：即实数，指带小数点的数值。字符串常量：被一对双引号括起来的若干个

7、合法的字符称为字符串常量。例如："China "、”ViSUalBasic”、”18”、”3.1415 ”等，双引号中字符，不包括双引号本身。逻辑常量：包含trUe和false两个值。系统常量：包括VB已定义的常量（如 Vbred ）和用户定义常量（如果多次用到同一个常量， 则可用一个有意义的名字表示这个常量。ConSt pi=3.14159 ）（四）、变量:在程序执行过程中，其值可以改变的量称为变量变量命名注意要点：1、必须以字母开头，不能以数字或其他字符开头。2、 只能由字母、数字或下划线组成，不能含有小数点、空格等字符。3、最长不超过255个字符4、 不能以VB保留字

8、作变量名，如语句定义符dim、函数名Str等。5、VB不区分变量名中字母大小写。如HELLo和HeIIo是同一个变量。数据及运算（1） 常用数据类型：（整型）1 nteger、（长整型）Long、（单精度型）Single、（双精度型）DoUble、 （字符串型）String、（布尔型）Boolean、（日期型）Date其中（整型）lnteger、（长整型）Long、（单精度型）Single、（双精度型）DoUble属于数值型 表示围：（整型）lnteger （-32768 32767,存储为 16位，2个字节）（字符串型）String字符串型数据是指用括起来的一串字符。如 欢迎进入VB世界！”

9、、（ViSUaIBasic"、1234 ”都是字符串类型。（2）常量和变量的命名、声明及赋值符号常量的声明：Const常量名=常量值女口： Const Pi = 3.14159常量名为 Pi变量的声明：WQrd资料Dim <变量名 >As <变量类型>女口： Dim a AS Integer定义一个整型变量，变量名为a变量的赋值变量名=表达式例题PriVate SUb Form_Click()Dim a AS In teger, b AS In teger, C AS In tegerDim Str_1AS Stri nga = 54: b = 114:C =

10、 a + bStr_1 = "Hello World" Print a,b,cPrint Str_1End SUb2、VB语言中，下列数据类型说明符中表示字符型的是（）。A、BooleanB、IntegerC、Date D、String3、在VB语言中，下列合法的变量名是（）。A、34abB、ab34C、*abcD、cc4、 下列选项中属于字符串常量的是（）。A、abB、a+bC、"1235"5、在VB语言中，下列合法的变量名是（A、 aa B、（五）运算符算术运算：+力口 -减幕/ （实数）除 整除Mod求余数单选题6、分析下列程序a*bC、 7ab*

11、乘例：22 = 4例: 5 / 2 = 2.5 例：52 = 2 例: 5 Mod 2 = 1D、1235 )。D、dim小于号大于号小于等于号PriVate SUb Form_Click()s=113 + 11 Mod 3Print SEnd SUb当单击窗体时S的值是（）.A、5B、6 C、4 D、3关系运算=赋值、V<>不等于>>=大于等于号V=注意：关系表达式的运算结果为布尔值TrUe或FalSe例：3 > 2结果为True(真或是)7、下面表达式的值是A、"969" < "n97"逻辑运算false 的有()

12、.B、Int(4.99) <> Ien("basic")C、str(2000) < "1997"D、3 > 2Not (取反)And (与)Or (或) 运算结果为布尔型(BaaIean)TrUe或False 逻辑运算符的优先级为： Not > And > OrC、5 > 0 And 4 > 3 )。8、下列逻辑表达式的值为“假”的是()。D、10 / 5 <3D、4 + 11 > 20A、2 + 4 > 8 B、3 + 12 = 159、下列逻辑表达式的值为“假”的是A、3 + 5 &g

13、t; 7 B、8 / 4 < 4C、5 > 3 And 3 > 210、 已知A，B，C，D是简单变量，且都已有互不相同的值，执行语句A=C: D=B后，下列关系表达式逻辑值为“真”的是()。A、C=A B A=BC、D=CD、B=C11、设 a=2, b=3,在 VB 中，表达式 a>b Or b>3 值是:()A、FalseB、TrUeC、-1 D、1字符运算字符串连接符为“ + ”和&'”123 ” + 45 ”= 12345 ”123 ”& 45 ”= 12345 ”123 +45 ”语法错误12、VB的字符串运算符是“ &

14、”，该运算符主要用于连接两个或更多的字符串。如："abcd" &"efg"连接后的运算结果为："abcdefg"。那么，"1+2" & "3"的运算结果为：()。A、33 B、6C、"1+23" D、TrUe运算符的执行顺序在VB中，当一个表达式中同时出现多种运算符时，运算次序由运算符的优先级决定，优先级高的运算符先运算，优先级相同的从左向右进行运算。不同性质的运算符优先级如下。算术运算符 > 字符串运算符 > 关系运算符 > 逻辑运算符13

15、、在VB语言中，表示“ a大于0且b小于12”的正确表达式是()。A、b<12 Or a > 0 B、b > 12 And a < 0C、a > 12 Or a < 0D、a > 0 And b < 12(六)常用函数数学函数AbS(X)求 X 的绝对值，例：abs(-3.6) = 3.6Sqr(X)求 X 的平方根，例：sqr(100) = 10Int(x)求 X 的最大整数例：int(3.6) = 3int(-3.6) = -4Rnd()产生0，1)之间的随机小数(不包括1)Si n(x) CaS(X) Tan(X) Atn (x)EXP(X

16、) Lag(X)使用三角函数时，参数应是弧度，如数学中sin300应写为：Sin (30*3.14159/)字符串函数Len(字符串)求字符串的长度，例：Len( hello ” = 5Ward资料Mid（字符串，起始位置，截取长度）,例：Mid（ hello ”,2,2） = ei”14、函数mid （C,N1,N2）的作用是从字符串C中N1位开始取出长度为 N2的子串。那么,Mid （"aBcDeFg", 3, 3）的值为（）。A、aBcB、CdeC、eFg D、CDe常用转换函数Val（字符串）将字符串转换为数值，常用于数值的输入语句中。例：Val（ 123”）=12

17、3Str（数值）将数值转换为字符串，常用于数值的输出语句中Chr（在ASCII表中取数值对应的字符） 例：chr（65）= ”A”Asc（求字符在 ASCII表中的数值）例：asc（ a"）=9715、 ViSUaI BaSiC中，下列（）函数是求绝对值的。A、ABS（X）B、SQR（X）C、INT（X）D、STR（X）16、表达式 Abs(-3.6)*sqr(100)的值是(）。A、-36B、360C、36 D、-36017、下列（）数据类型不是数值型。A、DateB、SingleC、DoubleD、In teger18、下列函数中,返回值是字符串的是().A、MidB、IntC、

18、ValD、Len1 .2gt19、代数表达式2表达式后错误的是()A、g*t*t2B、12*g*t2C、g*t22D、gt222a b20、数学式子4ab在VB中的正确写法是:（）A、(2*a+b)4*a*bB、(2*a+b)(4ab)C、(2a+b)(4ab)D、(2*a+b)(4*a*b)21、 判断X是否在区间a, b上，在VB中以哪个逻辑表达式是正确的（）A、a<x and x<=bB、a<=x<=b C、a<=x and x<=b D、a>x and x<=b（七）程序设计的顺序结构顺序结构：代码按照由上到下的顺序一行一行地执行。程序执

19、行过程中没有分支、 没有重复，这种结构称为顺序结构。例题：交换两个变量中的数据。PriVate SUb CmdSWaP_Click（）Dim X AS Sin gle, y AS Si ngleDim m AS Si ngleX = Val（txtsx.Text）y = Val（txtSy.Text）m = x: X = y: y = m'交换数据txtdx.Text = Str（X）txtdy.Text = Str（y）End SUb牢记以上代码中的数值型数据的输入和输出语句！ ！ ！22、以下是一段 VB程序：a = 1b = a + 1C = a + b它的基本结构属于（）A、顺

20、序结构B、选择结构C、循环结构D、树型结构23、下列VB程序运行后，变量 X的值为（）.x=2Print x+lPrint x+2A、2B、3C、5D、8（A）程序设计的分支结构行If语句行If是指在一行中写完的If语句。其一般格式为：格式一：If条件Then语句执行这种形式的If语句时，首先对条件进行判断。若条件成立，则执行Then后面的语句；若条件不成立，则执行If语句后继程序行的语句格式二：If条件 Then语句1 Else语句2例题：输入三个不相同的数，求出其中最小数。PriVate SUb Form_Click（）Dim a AS Si ngle, b AS Si ngle, CAS

21、 Si ngleDim Min AS Si nglea = InPUtBox（"输入 a","输入框"）b = InPUtBox（"输入 b","输入框"）C = InPUtBox（"输入 c","输入框"）If a < b The n Min = a Else Min = bIf C < Min Then Min = CPrint "最小数="MinEnd SUb执行这种形式的语句时，先进行判断。若条件成立，则执行语句1 ;否则执行语句 2。

22、必须写在一行，不能换行，没有End If块If语句上述If-then语句只能根据条件的真假是否执行一条语句，当Then部分和EISe部分包含的容较多时，则可选用“块If语句”结构。格式三：If条件Then语句块End If例题：当从输入一个数时，当该数大于或等于60时显示"及格"，该数小于60时显示"不及格"。PriVate SUb Comma nd1_Click（）Dim a AS Si ngleWord资料a = VaI（TeXt1.Text）If a >= 60 The nLabei1.Caption ="及格"End I

23、fIf a < 60 The nLabel1.Caption ="不及格"End IfEnd SUb 这样的格式是不是太麻烦了，所以请选用格式四，自己改过来吧！格式四：If条件Then语句块1Else语句块2End If例题：编写程序，求函数 Y的值（当x0时，y=3x+1 ;当x>0时，y=4x+1）PriVate SUb Form_Click（）Dim X AS Si ngleDim y AS Si ngleX = Vai（InputBox（"请输入变量 x"）If X <= 0 Theny = 3 * X + 1EiSey = 4

24、 * X + 1End IfPrin t "y=" yEnd SUb单选题24、以下是一段 ViSUai BaSiC程序：If I=1 The nX=X+1EiSeX=X*2End If它的基本结构属于（）.A、选择结构 B、循环结构C、顺序结构D、树型结构25、 下列程序段运行后，变量VaiUe的值是（）X = 20If X >= 10 ThenVaiUe = 5 * XEiSeVaiUe = 4 * XEnd IfA、 100B、 80C、 90D、 70Word资料26、下面是判断变量X是不是能被5整除的偶数的程序，横线上的逻辑表达式应为()PriVate SU

25、b comma ndl_Click()Dim X AS In tegerX=VaI(Text1. TeXt)If The nLabell.Caption="这个数是能被5整除的偶数”ElseLabell.Caption="这个数不是能被 5整除的偶数”End If选项：A、(X MGd 5)=0 And (X MGd 2 ) = 0B、(X MGd 5)=0 Gr (X MGd 2 ) = 0C、X MGd 5 =0D、X MGd 2 =027、下列程序段运行后,m的值为(A=2: b=1: c=5If A < b The n m = A Else m = bIf C

26、 < m The n m = CA、1B、2 C、5D、提示错误，无答案(九)程序设计的循环结构1、FGr-NeXt 循环FQr循环变量一般形式是：FGr循环变量=初值TG终值Step循环变量增量 循环体NeXt循环变量例题 1: 求 S= 1+2+3+4.+100PriVate SUb CGmma nd1_Click()Dim i AS In tegerDim SUmAS In tegerSUm = 0FGr i = 1 TG 100SUm = SUm + i '循环体NeXt iText1.text=str( SUm)End SUb注意这里累加器的应用例题2： SteP循环变

27、量增量PriVate SUb CGmma nd_Click()FGr j = 3 TG 15 SteP 2Print j'共输出7个值NeXt jEnd SUb '变量j=3 5 7 9 11 13 15 17循环7次，j最后的值为17不算在循环中。循环变量的初值、终值、循环变量增量都是数值型。其中要重复执行的操作称为循环体，增量可正可负，如果没有设置SteP ,则增量的缺省值为 11、循环变量取初值；2、 循环变量与终值比较，没有超过终值转3 ,否则循环结束，接着执行循环语句的后继语句；3、执行一次循环体4、循环变量增加一个增量5、重复步骤24。以上可以看出，For-NeXt

28、循环变量是一种当型循环。说明(a) For语句与NeXt语句必须成对出现，而且它们当中的"循环变量”必须是同一个变量, 如上例中均为I。(b) 当循环变量为正时，循环变量超过终值，是指循环变量的值大于终值时；若为负， 则是指循环变量的值小于终值。2、Do Loop 循环FOr-NeXt循环的次数是确定的，但是有的问题只知道循环结束的条件，重复执行的次数事先并不知道，这是需要Do-Loop循环格式一：Do While条件循环体Loop例题：求最大公约数PriVate SUb Comma nd1_Click()Dim a,b,r AS In tegera = VaI(TeXt1.Text

29、)b = VaI(TeXt2.Text)r = a Mod bDo While r <> 0a = bb = rr = a Mod bLoopText3.Text = Str(b)End SUb当VB执行Do While-LOoP循环时，先判断指定的条件是否为真，若条件为真, 执行循环体，条件为假时退出循环。28、 下列程序段执行结束后，变量y的值是()。y=2Do while y<=6y=y+yLoopA、2B、6 C、8 D、1629、分析程序，写出执行结果。PriVate SUb comma nd1_click()Dim S AS In teger,I AS In te

30、gerS=0For i=1 to 10 SteP 2S=S+iNeXt iPrint S= ”SEnd SUb答案：S=(十)算法与问题解决1、解析法利用所学的数学或物理等知识来求解一个问题。2、枚举法对所有可能的情况都逐一列举和判断。外循环分支的结构。简单理解一下程序思想及代码(部分程序请补充完整代码 )(1) 一只猴子摘了一堆桃子，它每天吃当天桃子数的一半，每次忍不住多吃了一个。这样到第 十天时只有一个桃子可以吃了，编程计算猴子最初共有多少个桃子。程序：PriVate SUb Comma nd_Click() Dim i AS In tegerDim S AS In tegerS = 1For i =1 To 9S = (S + 1)*2NeXtPrint S=''SEnd SUbWord资料完善按钮“计算7!”的CIiCk事件程序，当单击命令按钮时Textl显示7!的值。PriVate SUb Comma nd1_Click()Dim a AS IongDim i AS In teger (30)For i = 1 To 7a = a * iNeXt i (31)End SUb这里输入值太大容易溢出”，可以更改变