VB程序题.doc

VB程序题.doc

《VB程序题.doc》由会员分享，可在线阅读，更多相关《VB程序题.doc（8页珍藏版）》请在冰豆网上搜索。

VB程序设计结构：

顺序结构、分支结构、循环结构。

一、顺序结构题：

2、该程序段运行后，

变量b的值为?

a=7

b=8

a=a+b

b=a-b

1、以下程序段的执行结果是?

A=1

b=5

c=4

a=b

b=c

c=a

Printa;b;c

4、该程序段运行后，变量a的值为?

a=8

b=7

z=a

a=b

b=z

3、下面程序段的划线部分应是?

A=356

b=214

t=a

a=b

printa;b

运行结果

214356

6、Text1和Text2中分别输入5，6，求Labe7l中值？

DimXASSingle,YASSingle,ZASSingle

X=Val（Text1.text）

Y=Val（Text2.text）

Z=X*Y／10

Label7.caption=Z

5、经过几下几条语句，A和B的值分别为多少？

A=6

B=7

C=A

A=B

B=C

二、分支结构：

当条件满足时，执行语句组1

当条件不满足时，执行语句组2

执行完语句组1或语句组2后执行

Endif下面的语句。

IF<条件>Then

<语句组1>

Else

<语句组2>

Endif

当条件满足时，执行语句组，接着执行Endif下面的语句。

当条件不满足时，执行Endif下面的语句。

IF<条件>Then

<语句组>

Endif

2．下列程序运行后，变量Value的值是?

x=12

Ifx>=10Then

Value=5*x

Else

Value=4*x

EndIf

1、以下程序段的执行结果为？

　　　　　A=5

　　　　　B=6

IfA

　　　　　T=A

　　　　　A=B

　　　　　B=T

　　　Endif

Printa;b

4、该程序段运行后，变量a和b的值分别为

a=9:

b=7

Ifa

t=a

a=b

b=t

EndIf

3、该程序段运行后，变量a的值为？

a=7

Ifa<6Then

a=a-2

EndIf

a=a+2

5、该程序段运行后，变量a和b的值分别为?

a=9:

b=7

Ifa>bthen

t=a

a=b

b=t

EndIf

答案：

1、a=6b=52、Value=603、a=9

4、a=9:

b=75、a=7b=9

Selectcase表达式

　　case表达式列表1

　<语句组1>

　　case表达式列表2

　<语句组2>

　　……

　　case表达式列表n-1

　<语句组n-1>

　　caseelse

　<语句组n>

EndSelect

当表达式的值为表达式列表达1时，执行语句组1；

当表达式的值为表达式列表达2时，执行语句组2；

……

当表达式的值为表达式列表达n-1时，执行语句组n-1；

当表达式的值不是上述值时，执行语句组n；

n=Text1.Text

SelectCasen

Case1To20

x=10

Case2,4,6

x=20

CaseIs<10

x=30

Case10

x=40

EndSelect

Text2.Text=x

EndSub

程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是

答案：

10

cj=VAL（Text1.Text）

SelectCasecj

Case0To59

dj=“E”

Case60To69

dj=“D”

Case70To79

dj=“C”

Case80To89

dj=“B”

Case90To100

dj=“A”

CaseElse

Label1.Caption=“你输入的成绩有问题！

”

EndSelect

Label1.Caption=“你的成绩等级为：

”+dj

EndSub

程序运行后，如果在文本框Text1中输入87，然后单击命令按钮，则在Label1中显示的内容是

答案：

你的成绩等级为：

B

三、循环结构

For循环变量=初值To终值[Step步长值]

[循环体]

Next循环变量

在执行For语句时，把初值赋给循环变量，并且记录终值和步长。

如果步长为1，Step语句可省略。

执行循环体

当执行Next语句时，要做两件事：

第一是改变循环变量的值，循环变量（当前的值）+步长；第二是检查循环变量的新值是否已超过初值和终值的范围，如果没有超过，就返回执行循环体；若超过终值，就退出循环，执行Next的后续语句。

用以下程序段求100以内的偶数和，划线部分的语句应为？

S=0

fori=0to100step2

_________

Next

n=0

Fori=0To11

i=i+3

n=n+1

Nexti

Textl.Text=Str（n）

程序运行后，在文本框中显示的值是？

以下程序段的执行结果为？

a=5

Fork=15To0step-3

a=a+k

Nextk

Printk;a

以下程序段的执行结果是？

S=1

ForI=0to4

S=S*I

NextI

prints

答案：

1、32、s=s+i

3、k=-3a=504、s=0

四、选择题

1、流程图如右图所示，其输出结果是（）

A.4B.3C.10D.5

答案=A

2、

该程序段运行后，变量y的值是（）

A.25B.20C.15D.0

答案=B

3、把二进制数10转换为十进制数，其值为（）

A.6B.4C.2D.8

答案=C

4、下列属于VisualBasic合法变量名的是（）

A.8abB.a?

2C.ifD.cengji

答案=D

5、流程图如右图所示，若输入x、y的值为1和-4，则输出结果是（）

A.-5B.-3C.3D.5

答案=D

6、

要使循环体t=t*k执行5次，循环变量的初值应该是（）

A.2B.1C.0D.10

答案=B

7、

2πa在VisualBasic中的表达式是（）

A.2?

3.1416?

aB.2*?

aC.2πaD.2*3.1416*a

答案=D

8、

该程序段运行后，循环体执行的次数是（）

A.2B.1C.0D.出错

答案=C

9、

该程序段运行后，变量a，b的值是（）

A.3，2B.2，1C.2，3D.5，2

答案=A

10、

“x小于30且y大于20”的逻辑表达式是（）

A.x<30Noty>20B.x<30Ory>20C.x<30Andy>20D.x<30:

y>20

答案=C

11、表达式Int（3.141*100）/100的值是（）

A.314.1B.314C.3.14D.3

答案=C

12、

该程序段运行后，变量s的值为（）

A.80B.60C.15D.3

答案=C

13、

该程序段运行后，变量s的值为（）

A.10B.50C.1D.5

答案=B

14、下面程序段的循环步长是（）

Fori=1To1000

s=s+i

Nexti

A.不确定B.1000C.1D.0

答案=C

15、以下程序段的执行结果为（）

A=2:

B=3

IfA

T=A:

A=B:

B=T

Endif

Printa;b

A.33B.22C.32D.23

答案=C

16、王浩同学用VB设计了一个加法器，左图是它的主界面，右图是实现加法运算的关键代码。

右图中的代码应该写在（　　）按钮的“Click”事件中。

A.“清除”B.“计算”C.“窗体”D.“退出”

答案=B

17、在VB程序中，能表示Ｘ或Ｙ小于Ｚ的表达式是（）

A.X

答案=D

18、如图，在这个用VB制作的“加法器中”，圈内部分需要使用右图中哪个控件？

A.③B.②C.①D.④

答案=D

19、用以下程序段求100以内的偶数和，划线部分的语句应为（）

S=0

fori=0to100step2

_________

Next

A.S=iB.S=S+2C.S=S+ID.i=i+2

答案=C

20、

在VB中插入一个命令按钮，图中是这个命令按钮的属性窗口，那么这个命