算法与程序设计分章节选择题

1、算法与程序设计分章节选择题姓名：_ 班级：_一、算法及算法的特征1在算法执行流程中，对于循环模式，下列说法正确的是（ ）A对某个情况进行判断，当结果为真时执行步骤一，否则执行步骤二B对某个情况进行判断，当结果为真时执行步骤一，然后再次判断这个情况，依此类推直到结果为假时结束C仅用循环模式就可以用来判断某个输入的数是不是正数D循环模式中可以嵌套选择模式，而选择模式中不能嵌套循环模式2算法的有穷性是指（ ）A算法必须包含输出 B算法中每个操作步骤都是可执行的C算法的步骤必须有限 D以上说法均不正确3算法共有三种逻辑结构，即顺序结构选择结构和循环结构。下列说法正确的是（ ）A一个算法只能含有一种逻辑

2、结构 B一个算法最多可以包含两种逻辑结构C一个算法必须含有上述三种逻辑结构 D一个算法可以含有上述三种逻辑结构的任意组合4下列关于算法的特征描述不正确的是（ ）A有穷性：算法必须在有限步之内结束 B确定性：算法的每一步必须有确切的含义C输入：算法必须至少有一个输入 D输出：算法必须至少有一个输出5若用VB程序解决以下四个问题： 输入一个数x，输出它的相反数； 求面积为6的正方形的周长； 求三个数a，b，c中的最大数； 求函数： x-1，x>0f（x）= x , x=0 的值. x+2 x>0 其中可以不需要用条件语句就能解决问题的有（ ） A1个 B 2个 C 3个 D 4个6有如

3、下算法： 输入整数a if a mod 2l，转到 if a mod 2= 0，转到 aa2 b = a2 aa2 ba2（1）当输入数字3的时候，程序段执行完时a的值为 ，b的值为 。（2）表示算法的语言主要有自然语言、流程图、伪代码等，本题使用的是 描述算法。7著名的汉诺(Hanoi)塔问题是应用哪种算法解决的( )8下列四段程序中，属于循环结构的是（ ） a=5 If x>k Then b=a Print("big")a=a+b EndIf For I=1 To 10 If Int(x/2)-x/2 Then j=x+1 Print(“偶数”) s=s+j El

4、seNext I Print(“奇数”) EndIfA B C D答案： 1B 2C 3D 4C 5B 65，3，伪代码 7C 8C二、面向对象1文本框控件和标签控件的区别(A) 标签框能输入，文本框不能输入 (B) 两者都能输入(C) 标签框不能输入，文本框能输入 (D) 两者都不能显示2下列关于添加“控件”的方法正确的是(A) 单击控件图标，将指针移到窗体上，双击鼠标(B) 双击工具箱中的控件，即在窗体上出现该控件(C) 单击工具箱中的控件，将指针移到窗体上，再单击(D) 用鼠标左键拖动工具箱中的某控件到窗体的适当位置3在Visual Basic工程设计中，要在标签对象Start上显示文字

5、“欢迎使用本系统!”， 则下列属性中应改变的属性是(A) Caption(B) Width(C) Font(D) Height4在Visual Basic工程设计中，双击窗体中的对象后，出现的是(A) 工程窗口(B) 工具箱 (C) 代码窗口(D) 属性窗口5命令按钮中设置控件是否可用的属性为(A) Enabled(B) Visible(C) Font(D) Caption6以下选项中，不是Visual Basic控件的是（）(A) 文本框(B) 定时器 (C) 窗体(D) 命令按钮7下列关于CommandButton控件的叙述正确的是(A) CommandButton控件的Caption属性

6、决定按钮上显示的内容(B) 单击VB应用程序中的按钮，则系统激活按钮控件对应的Change事件(C) CommandButton控件的name属性决定按钮上显示的内容 (D) 以上都不对8激发事件处理过程Command1_Click()的事件是(A) click(B) Change(C) Dblclick (D) KeyPress9能被对象所识别的动作是(A) 事件(B) 方法 (C) 属性(D) 过程10在Visual Basic代码窗口中，语句StudentFont=“宋体”中的Student是（ ）A对象名 B属性名 C属性值 D窗口名答案：A分析学习 Visual Basic的第一个难

7、点就是正确区分对象、属性及属性值。在 Visual Basic中，用ab表示“对象 a的属性 b”，用 ab“c”表示“对象 a的属性 b的值为 c”。因此本题中，“Student”、“Font”。“宋体”分别是对象名、属性名。属性值。11下列属于VB事件处理过程名的是（ ） ATextlText BCommandl_Click CSub DDim a As Integer12、下列叙述中错误的是A、 面向对象的程序设计方法的核心是对象功能的实现和表达B、 一个对象是由一组表示对象状态的数据和一组描述处理对象属性的方法的代码构成的C、 “可视化”和“事件驱动”是VB应用程序的重要特征D、 在面

8、向对象的程序设计中，类是对相似性质的对象的一种抽象，是对象的一个“实例”13一只漂亮的酒杯被摔碎了，则漂亮、酒杯、摔、酒杯被摔碎了分别代表的是 A. 对象，属性，事件，方法 B. 对象，属性，方法，事件 C. 属性，对象，方法，事件 D. 属性，对象，事件，方法 14VB中工程文件的扩展名为 A. .vbp B. .frm C. .bas D. .ds15Visual Basic规定窗体文件的扩展名是 A. .for B. .frm C. .vbp D. .bas16下列关于“控件”属性的说法正确的是 A. 单击窗体中的某控件，在属性窗口中的属性列表框中找到所要设置的属性，即可设置其属性值 B

9、. 所有对象都具有同样的属性 C. 控件的属性只能在设计时设置，不能在运行时修改 D. 控件的每一个属性都具有同样的默认值 17能改变命令控件名称的属性是 A. Text B. Name C. Caption D. BackStyle18下列各组控件都具有Caption属性的是A.窗体、文本框 B.标签、定时器 C.窗体、标签 D.文本框、定时器19下列每个控件都具有的属性是 A.Name B.Caption C.Font 20下列关于CommandButton 控件的叙述正确的是 A. CommandButton 控件的Caption 属性决定按钮上显示的内容 B. 单击VB应用程序中的按钮

10、，则系统激活按钮控件对应的Change 事件 C. CommandButton 控件的name 属性决定按钮上显示的内容 D. 以上都不对21窗体的BackColor属性用于设置窗体的22 Visual Basic提供的标签控件（LABEL）可具有功能是 A.输入文本 B.显示文本 C.计时 D.显示时间 23 要使窗体Form1的标题栏中显示“正在复制文件”，以下语句正确的是 AForm1.Caption=“正在复制文件” BForm1.title=“正在复制文件” CForm1.Text=“正在复制文件” DForm1.名称=“正在复制文件”24以下选项中，不是 Visual Basic控

11、件的是25编译一个工程的目的是A将工程的程序翻译成可以看懂的文件 B将工程的程序重新正确编排 C按工程的程序生成计算机能够执行的机器代码，使之能够脱离VB继承开发环境独立运行 D检查工程中有无错误的机器代码，以便工程能够脱离VB继承开发环境独立运行26双击窗体中的对象后，Visual Basic将显示的窗口是 A.项目（工程）窗口 B工具箱 C代码窗口 D属性窗口27若要设置文本框中所显示的文本颜色，使用的属性是28命令按钮能响应的事件是 ADblClick BClick CLoad DScroll29Visual Basic程序设计的完整的步骤是 A. 可视性程序设计 B代码程序设计 C可视

12、性程序设计和代码程序设计 D界面设计30在 Visual Basic环境下，当写一个新的 Visual Basic程序时，所做的第一件事是 A.编写代码 B新建一个工程 C打开属性窗口 D进入VB环境31Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是 A属性、事件、方法 B控件、属性、事件 C窗体、控件、过程 D窗体、控件、模块 32下列关于事件的叙述中不正确的是A事件是系统预先为对象定义的能被对象认别的动作 B事件可分为用户事件与系统事件两类 CVB为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写DVB中所有对象的默认事件都是Clic

13、k33在如下图所示的Visual Basic窗体中，这些被放入窗体中的控件称之为（A）类 （B） 事件 （C）属性 （D）对象34下列哪个控件为标签控件（A） （B） （C） （D）35若要使某文本框获得控制焦点，可使用的方法是(A) LostFocus(B) SetFocus(C) PointD(D) value 17B 18C 19A 20A 21C 22B 23A 24C 25C 26C 27C 28B 29C 30B 31A 32D 33D 34A 35B三、数据类型、常量、变量、数组、函数、运算符、表达式1下列属于Visual Basic字符串常量的是(A) 1/2(B) Int(3

14、.4)(C) "1/2"(D) 1+22、在VB中，合法的常量是（     ）A、xxx       B、2/3                  C、5e                   D、 false 3下列可以作为Visual

15、Basic的变量名是(A) Man_1(B) A*123(C) A>B (D) A&B4、 下面是合法的变量名为( )A、 x_y B、 123abc C 、integer D、 X-Y 5在VB中，要定义一个一维数组a，用于存储1000个整数型数值，则正确的数组定义语句是 A Dim a l000 As Integer B Dim a（11000） As Integer CDim a（l， 1000） As Integer D Dim a（1 To 1000）As Integer6在Visual Basic中，表示字符串型的数据类型名是(A) Long(B) Integer (

16、C) String (D) Boolean7在Visual Basic中，变量a中的数值是整数而且可能在-3276832767范围之外，则变量a的数据类型应定义为 (A) 日期型 (B) 整数型(C) 长整数型 (D) 逻辑型8在Visual Basic中，语句Dim x As Boolean的作用是将变量x定义为(A) 字符串型 (B) 整数型 (C) 逻辑型 (D) 日期型9、下列数据中属integer类型的是（ ）A、 32766 B、 38765 C、38765.5 D 、“32767ab”10、在VB中，执行 “A=123：B=Str(A)”语句后，B的数据类型为（ ）。A、整型数

17、B、字节型 C、实型数 D、字符型11、设 x=-3，则表达式x< -2的值是（    ）A、true           B、 false                 C、 -1             D、 012、VB中，mid(“A2B4“,2,1)的值是（   

18、;  ）A、2B       B、  0             C、  2        D、 413、VB表达式SQR（9）+INT（-5.4）*LEN(“”)- FIX(3.1)的值是（    ）A.  -6         B.  -5

19、60;                C.  35               D.  -3014、下列正确的表达式是（    ）A.“ok”=text1.text             B.  text1.text=”x+y”

20、C.  text1.text+1=3                D.  text1.text=dim15、下面正确的赋值语句是（ ）A、x+y=30 B、y= *r*r C、y=x+30 D、3y=x18、VB中运算符被分为四类，分别是（ ）A、算术运算符、连接运算符、关系运算符、逻辑运算符 B、算术运算符、比较运算符、关系运算符、逻辑运算符C、算术运算符、连接运算符、布尔运算符、逻辑运算符D、连接运算符、比较运算符、逻辑运算符、关系运算符19、数学关

21、系3<= x<10表示成正确的VB表达式为（ ）A、3<=x<10 B、3<=x AND x<10 C、x >= 3 OR x<10 D、3<=x AND<1020、为了给三个变量赋初值1，下面正确的赋值语句是（ ）A、x=1：y=1：z=1 B、x=1，y=1，z=1 C、x=y=z=1 D、xyz=121、设a=2,b=3,c=4,d=5下列表达式的值是Not a<=c Or 4*c=b2   And b <> a+c （ ）A）-1     B）1     &#

22、160; C）True     D）False22、函数Int(Rnd*80)+10是在（    ）范围内的整数A、 10,90      B、 10,89        C、 11,90           D、11,8923、Int（198.555*100+0.5）/100的值为（ ）A、198 C、198.56 D、20024、A为True,B为False, 则 “A a

23、nd B”和 “A Or B”的值分别是（ ）。 A、True,True B、True，False C 、False,True D 、False,False25在 Visual Basic中，下列属于算术运算符的是（ ） A B CMOd DAnd26在VB程序设计的过程中，有时需要将几个不同的字符串连接起来，这时需要用到字符串运算符号“”；那么”20”08”的运算结果是（ ） A”28” B False C”2008” D”2008”27InputBox函数值的数据类型(A) Integer(B) String(C) Boolean(D) Single28在Visual Basic中，表达式

24、Int(-4.5)的值是(A) -5(B) 4(D) 529Visual Basic函数Fix(x)的作用是截掉数据的小数部分。已知a是实数，当关系表达式Fix(a)=a为真时，则表示a是 (A) 负数(B) 正数(C) 整数(D) 小数30随机产生一个两位正整数的VB表达式是(A) 1+Int(100*Rnd)(B) 10+Int(90*Rnd)(C) Int(100*Rnd)(D) Int(90*Rnd)31设a=3，b=4，下列运算结果中，值最大的是(A) Sqr(b/a) (B) ba (C) Int(b/a)(D) a Mod b32在Visual Basic中，已知a、x、y均是正

25、整数，当逻辑表达式(a Mod x = 0) And (a Mod y = 0)为真时，则表示(A) a是x的倍数，但不是y的倍数(B) a既是x的倍数，又是y的倍数(C) a是x的倍数或者是y的倍数(D) a既不是x的倍数，也不是y的倍数33圆周长的计算公式为L=2a，其中a为圆半径。在Visual Basic中，能正确表示2a的表达式是(A) 2a(B) 2*a(C) 2?a(D) 2*3.1416*a34表达式Int(Sqr(12)的值是(A) 1(B) 2(C) 3(D) 435数学表达式|x-31|对应的VB表达式是(A) Sqr(x31)(B) Val(x31)(C) Abs(x3

26、1)(D)Str(x31)36随机数因子Rnd的取值范围是下列的哪个？(A) 0，1区间的实数(B) 0，1）区间的实数(C) （-1，1）区间的实数 (D) -1，1区间的实数37能完全正确表示“year是闰年”的逻辑表达式是(A) year mod 4 = 0(B) year mod 400 = 0 or year mod 4 = 0 and year mod 100 <> 0(C) year mod 400 = 0 (D) year mod 400 = 0 and year mod 4 = 0 or year mod 100 <> 038在VB中，若x，y均是正整

27、数，则与关系表达式x Mod y0等价的表达式是（ ） AInt（xy）=xy Bxy=0 CFix（x）y Dxy=039、语句“dim c as _”定义的变量c, 可用于存放控件的Caption的值40、Dim x (2 to 5) as integer 语句定义的数组占用_个字节的内存空间41、表达式mid(str(7563),2,3)的值是_42、表达式817 mod 22的值是_43、已知ch="12345",表达式val (mid (ch,len(ch)2,3)的值是_44、语句Print Not 10>15 and 8<5+2 的输出结果是_45

28、、设x 为一个两位数，将其个位和十位数交换后所得两位数的VB表达式是_46、数组声明语句 dim var(1 to 2,-2 to 4),定义了数组的元素个数为_。答案：1C 2D 3A 4A 5D 6C 7C 8C 9A 10D 11A 12C 13D 14A 15C 16D C B 17C D A 18A 19B 20A 21D 22B 23A 24C 25C 26D 27B 28A 29C 30B 31D 32B 33B 34C 35C 36B 37B 38A 39String 4010 41563 423 43234 44False 45X10+(X-X10*10)*10 4614四、

29、语句、过程、函数1、语句If x=1 Then y=1,下列说法正确的是（ ）A、x=1和 y=1 均为赋值语句 B、x=1和 y=1均为关系表达式C、x=1为关系表达式，y=1为赋值语句 D、x=1为赋值语句，y=1为关系表达分析 在VB程序设计中，变量、表达式、基本语句的正确使用是必须熟练掌握的。本例考查行If语句的格式：If 条件表达式 Then 语句1，因此，结论是C。2、 在一个语句内写多条语句时,每个语句之间分隔符号是( )A ， B： C 、 D ；3、 在VB中，执行“Text1Text= ' Tel这行语句时

30、“ ' ”后面的部分为（ ）A、注释部分，不是可执行代码 B、注释部分，但是可以执行代码C、程序代码的一部分 D、程序代码的另一种写法4、分支结构的程序在进行判断后可分别控制程序有（ ）个以上的走向。A、1 B、2 C、3 D、85、 使用过程编写程序是为了（    ）A. 使程序模块化    B. 使程序易于阅读 C. 提高程序运行速度    D. 便于系统的编译6在VB中，设已定义函数过程f，它有三个实型传值参数；设a，b，c为实型变量，则调用该函数的正确语句是（ ）A f B f（abbc） Cf（ab，bc，

31、ca） Dfab，bc，ca7、以下语句中，与语句if a>"x" and b<>"y" then c=p else c=q等价的是A、if a<="x" or b="y" then c=q else c=p B、if a<="x" and b="y" then c=q else c=pC、if Not(a<="x" or b="y") then c=q else c=p D、if a<&quo

32、t;x" and b="y" then c=q else c=p8将文本框Text1内输入的数据送到数值型变量n中，则应使用的语句是(A) n=text1(C) n=val() (D) n=val(text1.text)9语句x=x+1的正确含义是(A) 变量x与x+1的值相等 (B) 将变量x的值加到x+1中去(C) 将变量x的值加1后赋值给变量x(D) 变量x的值为110有以下VB程序： Private Function Prime（m As Integer） As Boolean Dim i As Integer PrimeTrue Fo

33、r i2 To Int（Sqr（m） If r mod i0 Then PrimeFalse： Exit For Next i End Function Private Sub Commandl_Click（） Print End Sub 其中，函数Prime的作用是判断某自然数m是否为素数。现要判定正整数17791是否为素数，则上述程序中空格 处应填入什么内容?请把结果写在下面： 。11设计一个“偶数迁移”的 Visual Basic程序，具体要求如下： （1）程序界面如图S-2-3所示： （2）程序功能： 单击“产生”按钮（Commandl），产生10个两位正整数放入左边的 列表框List

34、l中，同时清空右边的列表框List2中的内容。 单击“偶数迁移”按钮（Command2），将列表框 Listl中的所有偶数迁移到列表框List2中。 在以下 Visual Basic程序的划线和处填入合适的语句或表达式，完善按钮Commandl、Command2的单击事件。 Dim a（1 To 10） As Integer Private Sub Commandl_Click（） Randomize For i1 To 10 a（i） Int（Rnd（）* 90 10） ListlAddltem（Sir（I） Next i End Sub Private Sub Command2_Click

35、（） ListlClear For i1 To 10 If then List2Addltem（Str（a（i） Else ListlAddItem（Str（a（i） End If Next i End Sub 程序中空格与处应填入的内容是： 。 。12、在窗体上有一个文本框控件，名称为text1；一个命令按钮，名称为command1，要求单击命令按钮的时候，在文本框中显示“欢迎你！”程序为：（ ）Private Sub Command1_ ( )Text1.Text = "欢迎你"End Sub在下划线后应填入的内容是A、Load B、Text C、Click D、key

36、press13、函数过程F1的功能是：如果参数b为奇数，则返回值为1，否则返回值为0。以下能正确实现上述功能的代码是A）     Funtion F1(b as integer) B）     Funtion F1(b as integer) If b mod 2 =0 then If b mod 2 =0 then    Return 0 F1= 0 Else Else    Return 1 F1= 1 End if End if End Funtion End Funtion C）    

37、 Funtion F1(b as integer) D）     Funtion F1(b as integer) If b mod 2 =0 then If b mod 2 <>0 then  F1=1 Return 0 Else Else    F1=0 Return 1 End if End if End Funtion End Funtion14设有以下循环结构Do While <条件>循环体Loop则以下叙述中错误的是(A) 若“条件”是一个为1的常数，则一次也不执行循环体(B) “条件”可以是关系表达式、逻辑

38、表达式或常数(C) 循环体中可以使用Exit Do语句(D) 如果“条件”总是为True，则不停地执行循环体15、窗体上有一个命令按钮，名称为Command1,然后编写如下程序：Private Sub Command1_Click()For i = 1 To 4 For j = 0 To 1 Print Chr(65 + i) Next jNext iEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是_答案：1C 2B 3A 4B 5A 6C 7C 8D 9C10 Prime（17791） 11 List2Clear a（i）/2=Int（a（i）/2）12C 13B

39、 14A15BBCCDDEE五、简单程序阅读1、下列程序运行后I的值是（ ） Private sub Form_click()      Dim X(4) as integer For i=1 to 4             X(i) =i*i Next i End Sub A、4 B、 5 C、16 D、252、下列程序运行后的结果是（   ）Private sub command_click()  For i=1 to

40、4     X=4       For j=1 to 3          X=3            For k=1 to 2                X=x+6           Nex

41、t k,j,i    Print xEnd subA. 7           3、假定有如下事件过程：Private sub form_Click()    Dim x as integer , n as integer    X=1    N=0    Do while x<28          X=x*3        &#

42、160; N=n-1    Loop    Print x,nEnd sub程序运行后，单击窗体，输出结果是A）81     4 B）56     3 C）28     1 D) 243     5答案：A4、有如下程序：    private Sub Form_click()          dim Check ,Counter          che

43、ck=true          counter=0          do                 do while Counter<20                    Counter=Counter +1           

44、60;       If counter=10 then                          Check=false                          Exit do                &

45、#160;   End if                 Loop          Loop Until Check=false          Print Counter,Check End sub程序运行后，单击窗体，输出结果为：（ ） A）15   0       B）20    -1 C）10   true

46、60;     D) 10   false答案：D5、有如下程序    private sub Form_Click()          dim I as integer , sum as integer sum=0 for I=2 to 10          If I mod 2<> 0 ans I mod 3=0 then              

47、0; sum=sum+I          end if next I Print sum End sub程序运行后，单击窗体，输出结果为：（）A）12           B）30           C）24                 D)18答案：A6、在窗体上面画一个名称为text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：P

48、rivate sub Command1_Click()    Dim array1(10,10) as integer    Dim I as integer,j as integer    For I=1 to 3          For j=2 to 4                Array1(I,j)=I+j          Next j

49、60;   Next I    Text1.text=array(2,3)+array1(3,4)End sub程序运行后，单击命令按钮，在文本框中显示的值是A）     12           B）13           C）14            D)15答案：A7、在窗体上画一个命令按钮，其名称为Command1,然后编写如下事件过程：    priva

50、te sub Command1_click()          dim a1(4,4),a2(4,4)          for I=1 to 4                for j=1 to 4                    a1(I,j)=I+j                    a2(I,j)=a1(I,j)+I+j                next j          next i           Print a1(3,3);a2(3,3)    End