VB算法与程序设计期末复习题精选

VB算法与程序设计期末复习题精选

一、选择题（程序基础知识）

1.关于算法及算法的表示，下列说法错误的是()

A．算法可以说是解决问题的方法和步骤

B．算法是解决问题的精确描述

C．算法的特征为：有限个步骤完成，明确性(即没有二义性)，可行性

D．自然语言不能用来表示算法，而流程图可以

2.下面是对某算法的描述

(1)设i的值为1;(2)设sum的值为0，(3)如果i≤6执行4，否则转去执行7；

(4)计算sum加i并将结果赋给sum;(5)计算i加1并将结果赋给i；

(6)转去执行3；(7)输出sum的值并结束算法。

这种描述算法的方法属于()

A．自然语言B．流程图 C.伪代码 D.程序设计语言

3.下列图形符号中，开始、结束框是(A)

4.古人的“钻木取火”过程主要有：①将木材晒干；②用制成的装置进行取火；③从山上采集合适

的木材；④将干木材制作成取火装置。下列能够描述“钻木取火”全过程的合理算法是（）A．③①④②B．①②③④C．④①③②D．②①③④

5.有流程图结构如下，其算法结构属于

（A）顺序结构（B）选择结构（C）分支结构（D）循环结构

6.猜数游戏的过程如下：①接收用户输入②比较用户的输入和待猜数是否相等，相等则输出“猜对”，

否则转向①继续执行，直到猜对为止。能表示此过程的流程图是（）

A B C D

7.国家标准GB17267-1998规定YSP-15型液化气钢瓶的充装重量为14.5kg,可以上下浮动0.5kg。下图

所示算法用于判断使用该型号钢瓶充装的液化气重量是否达标。钢瓶重量为15.5kg，充装重量用变量

x表示，瓶和气总重量用变量y表示。

流程图中①处应填写

（A）x=14.5（B）14≤x≤15（C）14.5≤x≤15（D）14≤x≤14.5

8.有流程图如下所示：

则流程执行完成后，输出的结果是（）

（A）3（B）5（C）8（D）9

9.某交通工具允许乘客携带不超过20千克的行李，检测行李重量的部分流程图如下，图中的虚线框部

分的功能是

（A）判断行李是否超过20千克（B）输出行李的重量

（C）输入行李的重量（D）输出超重部分重量

10.有流程图如下所示：

若输入a 的值为3，则该算法输出的结果为

（A）-3（B）0（C）3（D）9

11.阅读下列材料，回答1-4题：

2010年广州亚运会闭幕后，小李为了方便同学了解各国运动员获得的总奖牌数，用VB 程序设计了广州亚运会奖牌查询系统，界面如下图所示。

（1）在上图VB 程序设计的界面中，共有类的数量是()

A.3

B.4

C.5

D.6

（2）若想把需查询国家的文本框中输入文字（如“中国”）也显示成红色字体，则需要设置该文本框对象的属性是()

A.fontcolor

B.fillcolor

C.forecolor

D.backcolor

（3）某同学想了解中华人民共和国台北的金牌数，则在所查询国家中输入“中华台北”后，系统数据库中查得金牌数为13。系统将该值赋值给对应的金牌文本框txt_jp,则下列语句正确的是()

A.txt_jp=13

B.text=13

C.txt_jp.text=val(13)

D.txt_jp.text=str(13)

（4）在VB 程序界面设计中，若想使命令按钮上文字“查询”修改成“确定”，则下列属性中应改变的属性是()

A.名称

B.text

C.caption

D.visible

12.某VB 程序中有语句：command1.caption="确定"。该语句中的“caption ”是（）

A.对象名

B.类名

C.属性名

D.属性值

13.VB 语句label1.caption="结果"用于在标签中显示字符串，该语句中的“结果”是()

A.属性名

B.对象名

C.属性值

D.类名

14.在VB 中，所有对象都具有的属性是()

A.text

B.caption

https://www.360docs.net/doc/e413188862.html,

D.backcolor

15.在visual basic 中，语句label3.caption="how are you"中的label3是()

A.属性名

B.对象名

C.属性值

D.类名

16.下列关于对象的描述中，错误的是()

A.对象的属性用于描述对象的状态

B.对象的属性与方法可以有多个

C.对象事件的发生会驱动该对象相应事件处理过程的执行

D.对象的属性值只能在属性窗口中设置

17.在visual basic中，某对象的属性窗口如下图所示：

该对象名是()

https://www.360docs.net/doc/e413188862.html,mandbutton

https://www.360docs.net/doc/e413188862.html,mand1

https://www.360docs.net/doc/e413188862.html,mand_1

D.appearance

18.在VB程序中，若一行需要写上多个语句时，需要使用的并行符号是（）

A.感叹号（！）

B.问号（？）

C.冒号（：）

D.单引号（'）

19.在VB语句：If x=y then x=x-y，下列说法正确的是（）

A.x=y和x=x-y都是关系表达式

B.x=y和x=x-y都是赋值语句

C.x=y是赋值语句，x=x-y是关系表达式

D.x=y是关系表达式，x=x-y是赋值语句

20.下列各VB赋值语句中，正确的是（）

A.x-y=1

B.text1.text=x+y

C.if5>x>1then y=x-1

D.y=|x+1|

21.在VB中，要将"welcome"这个单词显示在标签label1上，下列语句正确的是（）

https://www.360docs.net/doc/e413188862.html,bel1=welcome

https://www.360docs.net/doc/e413188862.html,bel1.text="welcome"

https://www.360docs.net/doc/e413188862.html,bel1.caption="welcome"

https://www.360docs.net/doc/e413188862.html,bel1.caption=str(welcome)

22.“如果a,b中任意一个为0，那么y=y+1”。能实现该功能的VB语句是（）

A.if a=0and b=0then y=y+1

B.if a*b=0then y=y+1

C.if a=0,b=0then y=y+1

D.if a,b=0then y=y+1

23.在VB程序中，有变量定义语句dim a as double，变量a的数据类型是（）

A.整数型

B.单精度实数型

C.双精度实数型

D.逻辑型

24.在VB程序中，下列不属于字符串常量的是（）

https://www.360docs.net/doc/e413188862.html,puter

B."1.32"

C."青春"

D."21"

25.下列可以作为VB程序设计变量名的是（）

A.1score

B.s_1

C.sum&1

D.false

26.在VB数组说明语句dim a（-1to6）as single中，定义的元素个数为（）

A.6

B.7

C.8

D.9

27.下列不是VB标准函数名的是（）

A.sin

B.chr

C.dim

D.val

28.在VB程序中，函数int(-6.8)的返回值是（）

A.6

B.7

C.-6

D.-7

29.函数str(x)的功能是将数值X转换成相应的字符串，则str(-0.28)的返回值是（）

A.-0.28

B.-.28

C."-0.28"

D."-.28"

30.化学老师安排小王设计一个简单的VB程序，用来记录并统计参加比赛辅导的40位同学的模考成绩。

小王想定义一个包含40个整数的一维数组变量来记录同学成绩，下列语句最正确的是（

）A.dim score(-20to 19)as integer

B.dim score(0to 40)as integer

C.dim score(1,40)as integer

D.dim score(40to 1)as integer

31.下列函数的返回值中最大的是（）

A.sqr(8)

B.abs(-3.1)

C.int(3.7)

D.len("-2.8")

32.下列运算结果中，表达式值最大的是（）

A.2mod 3

B.3mod 2

C.2/3

D.2\3

33.将数学表达式“15≥t ≥-5”改写成VB 逻辑条件表达式，正确的是（）

A.15>=t>=-5

B.t<=-5and t>=15

C.t<=-5or t>=15

D.15>=t and t>=-5

34.将数学表达式“1-22ac b ”改写成VB 表达式，正确的是（）

A.1-sqr(b^2-ac/2)

B.1-sqr(b^2-a*c/2)

C.1-sqrt(b^2-ac/2)

D.1-sqrt(b^2-a*c/2)35.

字符串变量a ，b 的值分别为“123”、“321”，则表达式a+b 的值是（）A."123+321" B."123321" C.444 D."444"36.

字符串变量a 的值为“Visual Basic 6.0”,下列VB 表达式的值是“Basic ”的是（）A.mid(a,8,5) B.mid(a,8,4) C.mid(a,7,4) D.mid(a,6,5)37.

已知x=18，y="-3.14",则VB 表达式x+len(y)的值是（）A.-296 B.18 C.23 D."18-3.14"38.

已知字符串变量x 的值为“H ”,则VB 表达式chr(asc(x)+1)的值是(已知字符“A ”的ASCII 码是65)（）A."I" B."G" C.72 D.7439.

当a=1,b=2时，表达式not (ab)的值是（）A.0 B.1 C.true D.false 40.

当VB 表达式中，若a=2，则表达式abs(int(a-10.6)mod 3)\2的值是（）A.0 B.1 C.2 D.341.

变量c 中存储着一个字符，能够正确判断出该字符为数字字符“a ”~“z ”的VB 表达式是（）A.c>="a"and c<="z" B.c>="a"or c<="z"C.chr(c)>="a"and chr(c)<="z" D.chr(c)>="a"or chr(c)<="z"42.

VB 标准函数rnd 的作用是返回一个大于等于0且小于1的随机数。只能产生大于等于10且小于等于99的随机数的VB 表达式的是（）Ａ．int(rnd*90) B.int(rnd*90+10) C.int(rnd*89+10) D.int(rnd*89-10)43.

循环语句for i=1to 13step 3中循环体的执行次数是（）Ａ．4 B.5 C.10 D.1244.

有如下VB 程序段：S=0

For i=3to 10step 2

S=s+i

Next I

该程序段执行后，变量i ，s 的值分别是（）

Ａ．9，24 B.10，35 C.11，24

D.12，35

45.下列VB 程序段中循环语句

Dim x as integer

X=1

Do while x

X=x-1

Loop

Ａ．语法错误 B.死循环 C.循环体执行一次 D.循环体一次都不执行

二、填空题（程序代码实现）

46.执行以下VB程序段后，变量s的值是（0）

s=0

a=10

b=a-3*s

a=2*a-b

s=a-b

47.有下列VB程序段：

x=13

y=25

x=y

y=x

执行后x,y的值分别是（25,25）

48.下列VB程序运行时，在文本框text1中输入数据-25，在文本框text2中输入数据-100，单击命令按钮

command1后，文本框text3中显示的内容是（"10"）

private sub command1_click()

dim a as integer,b as integer,c as integer

a=val(text1.text)

b=val(text2.text)

if a>b and a>0then

c=sqr(abs(a))

else

c=sqr(abs(b))

endif

text3.text=str(c)

end sub

49.有如下VB程序，运行时，在文本框txt_1中输入数据42，单击命令按钮cmd_1后，文本框txt_2中

显示的内容是（"36"）

private sub cmd_1_click()

dim m as integer,n as integer

n=val(txt_1.text)

m=n\10+n mod10

if n=m*m then

txt_2.text=str(m)

else

txt_2.text=sqr(m)

endif

end sub

50.下列VB程序运行时，在文本框text1中输入数据789，单击命令按钮command1后，文本框text2中

显示的内容是（"9078"）

private sub command1_click()

dim n as integer,x as integer

n=val(text1.text)

x=n mod10

n=x*1000+n\10

text2.text=str(n)

end sub

51.有如下程序段：

S=1

For i=to5

S=s*i

Next

该程序段运行时，要使循环体s=s*i被执行6次，则循环变量i的初值是（0）

52.有如下VB程序段，执行完后其计算结果是（30）

S=0

I=1

Do while i<=10

If I mod2=0then

S=s+i

I=i+1

Else

I=i+1

Endif

Loop

Print s

53.某VB程序中有如下语句：

J=50

For i=49to1step-1

If a(i)>a(j)then j=i

Next I

该程序段执行后，变量a(j)中存储的是（最大值）

54.若柑*2*3*4*……*n，下列VB程序段的功能是求s不大于1000时的最大n值，请将程序中横线处补

充完整。

Dim s as integer,n as integer

S=1

N=1

Do while(1)

N=n+1

(2)

Loop

Print“n=”;n-1

(1)s<=1000;(2)s=s*n

55.在窗体上有文本框text1、text2和名称为command1的命令按钮，按钮的事件过程代码如下。程序执

行后，文本框text1中显示（1），文本框text2显示（2）。Dim x as integer,n as integer

X=1

N=0

Do while x<20

X=x*3

N=n+1

Loop

Text1.text=str(x)

Text2.text=str(n)

(1)27;(2)3