2023春VB语言程序设计作业及答案

2023春VB语言程序设计作业1

1/20单选题（5分）正确答案C我的答案C评分5分

以下叙述中，错误的是_______O

A

一个VisualBasic应用程序可以含有多个标准模块文件

B

一个visualBasic工程可以含有多个窗体文件

C

标准模块文件可以属于某个指定的窗体文件

D

标准模块文件的扩展名是.bas

2/20单选题（5分）正确答案A我的答案A评分5分

VisualBasic的窗体设计器主要是用来。

A

建立用户界面

B

添加图形、图像、数据等控件

C

编写程序源代码

D

设计窗体的布局

3/20单选题（5分）正确答案C我的答案C评分5分

VisualBasic程序设计语言属于_______。

A

面向过程的语言

B

机器语言

C

面向对象的语言

D

汇编语言

4/20单选题（5分）正确答案B我的答案B评分5分

假定一个VisualBasic应用程序由一个窗体模块和一个标准模块构成。为了保存

该应用程序，以下正确的操作是_______.

A

只保存窗体模块文件

B

分别保存窗体模块、标准模块和工程文件

C

只保存窗体模块和标准模块文件

D

只保存工程文件

5/20单选题（5分）正确答案D我的答案D评分5分

下面可以正确定义2个整形变量和1个字符串变量的语句的是_______

A

Dimn,mASInterger,sASString

B

Dima%,b$,cASString

C

DimaASInteger,b,cASString

D

Dimx%,yASInteger,zASString

6/20单选题（5分）正确答案A我的答案A评分5分

设有如下语句：

Dima,bAsInteger

c="VisualBasic"

d=#7/20/2005#

以下关于这段代码的叙述中，错误的是_______O

A

a被定义为Integer类型变量

B

b被定义为Integer类型变量

C

c中的数据是字符串

D

d中的数据是日期类型

7/20单选题（5分）正确答案B我的答案B评分5分

以下可以作为VisualBasic变量名的是_______。

A

A#A

B

counstA

C

3A

D

?AA

8/20单选题（5分）正确答案B我的答案B评分5分

表达式12000+"129"&200的值是________。

A

12329

B

"12129200"

C

"12000129200"

D

9/20单选题(5分)正确答案A我的答案A评分5分

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程：

PrivateSubCommandl_Clicl<()

a$="VisualBasic"

PrintString(3,a$)

EndSub

程序运行后,单击命令按钮，在窗体上显示的内容是_______O

A

VVV

B

Vis

C

sic

D

11

10/20单选题(5分)正确答案D我的答案D评分5分

在窗体上画一个文本框、一个标签和一个命令按钮其名称分别为Textl.Labell

和Commandl,然后编写如下事件过程：

PrivateSubTextl_Change()

Labell.Caption=Right(Trim(Textl.Text),3)

EndSub

程序运行后，在文本框中输入"abcdef",单击命令按钮，则在标签中显示的内容是

A

空

B

abcdef

C

abc

D

def

11/20单选题（5分）正确答案B我的答案B评分5分

设在名称为Myform的窗体上只有1个名称为C1的命令按钮，下面叙述中正确

的是________O

A

窗体的Click事件过程的过程名是Myform_Click

B

命令按钮的Click事件过程名是Cl_Click

C

命令按钮的Click事件过程的过程名是Commandl_Click

D

上述3种过程名称都是错误的

12/20单选题（5分）正确答案C我的答案C评分5分

以下能在窗体Forml的标题栏中显示"VisualBasic窗体"的语句是_______。

A

Forml.Name="VisualBasic窗体"

B

Forml.Title="VisualBasic窗体"

C

Forml.Caption="VisualBasic窗体"

D

Forml.Text="VisualBasic窗体

13/20单选题（5分）正确答案D我的答案D评分5分

对用MsgBox显示的消息框，下面_______是错的。

A

可以有一个按钮

B

可以有两个按钮

C

可以有三个按钮

D

可以有四个按钮

14/20单选题（5分）正确答案D我的答案D评分5分

在窗体上画一个名称为Timerl的计时器控件，要求每隔0.5秒发生一次计时器事

件，则以下正确的属性设置语句是_______O

A

Timerl.InterVal=0.5

B

Timerl.Interval=5

C

Timerl.Interval=50

D

Timerl.Interval=500

15/20单选题（5分）正确答案B我的答案B评分5分

在窗体上画一个文本框，其名称为Textlo为了在程序运行后Textl中的文本不

可编辑，应当使用的语句.

A

Textl.Clear

B

Textl.Locked=True

C

Textl.Visible=False

D

Textl.Enabled=False

16/20单选题（5分）正确答案C我的答案C评分5分

以下循环语句中在任何情况下都至少执行一次循环体的是_______。

A

DoWhile〈条件〉

循环体

Loop

B

,While〈条件〉

循环体

Wend

c

Do

循环体

LoopUntil〈条件》

D

.DoUntil〈条件》

循环体

Loop

17/20单选题(5分)正确答案B我的答案B评分5分

在窗体上画一个列表框和一个命令按钮，其名称分别为Listl和Commandl,

然后编写如下事件过程：

PrivateSubForm_Load()

Listl.Addltem"Item1"

Listl.Addltem"Item2"

Listl.Addltem"Item3"

EndSub

PrivateSubCommandl_Click()

Listl.List(Listl.ListCount)="AAAA"

EndSub

程序运行后,单击命令按钮，其结果为O

A

把字符串"AAAA"添加到列表框中，但位置不能确定

B

把字符串"AAAA"添加到列表框的最后（即"Item3"的后面）

C

把列表框中原有的最后一项改为"AAAA"

D

把字符串"AAAA"插入到列表框的最前面（即"Item1"的前

面）

18/20单选题（5分）正确答案A我的答案A评分5分

在窗体上画一个名称为Listl的列表框，一个名称为Labell的标签，列表框中显示

若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的索引值。

下列能正确实现上述操作的程序是_________。

A

PrivateSubListl_Click（）]

Labell.Caption=Listl.Listindex

EndSub

B

PrivateSubListl_Click（）

Labell.Name=Listl.Listindex

EndSub

c

PrivateSubListl_Click()

Labell.Name=Listl.Text

EndSub

D

PrivateSubListl_Click()

Labell.Caption=Listl.Text

EndSub

19/20单选题(5分)正确答案A我的答案A评分5分

将文本框的属性设置为True时，文本框可以输入或显示多行文本，且会

在输入的内容超出文本框的宽度时自动换行。

A

Multiline

B

Scrollbars

C

Text

D

Enabled

20/20单选题(5分)正确答案C我的答案C评分5分

语句a=InputBox("Today","Tomorrow","Yesterday",,,"Daybefore

yesterday",5)将显示一个对话框,在对话框的输入区中显示的信息是_______。

A

Today

B

Tomorrow

C

Yesterday

D

Day

2023春VB语言程序设计作业2

1/20单选题（5分）正确答案C我的答案C评分5分

以下循环语句中在任何情况下都至少执行一次循环体的是________。

A

DoWhile〈条件＞

循环体

Loop

B

While〈条件》

循环体

Wend

c

,Do

循环体

LoopUntil〈条件＞

D

DoUntil〈条件》

循环体

Loop

2/20单选题（5分）正确答案A我的答案A评分5分

某人设计了如下程序用来计算并输出7!（7的阶乘）

PrivateSubCommandl_Clicl＜（）

t=0

Fork=7To2Step-1

t=t*k

Next

Printt

EndSub

执行程序时，发现结果是错误的，下面的修改方案中能够得到正确结构的是

A

把t=0改为"1

B

把Fork=7To2Step-1改为Fork=7To1Step-1

C

把Fork=7To2Stip-1改为Fork=lTo7

D

把Next改为Nextk

3/20单选题（5分）正确答案B我的答案B评分5分

以下程序段的输出结果是________O

num=0

Whilenum＜=2

num=num+1

Wend

Printnum

A

2

B

3

C

4

D

程序出错

4/20单选题（5分）正确答案A我的答案A评分5分

设有以下循环结构：

Do

循环体

LoopWhile＜条件＞

则下列叙述中错误的是________.

A

若"条件”是一个为0的常数，则一次也不执行循环体

B

"条件"可以是关系表达式，逻辑表达式或常数

c

循环体中可以使用ExitDo语句

D

如果"条件"总是为True,则不停地执行循环体

5/20单选题(5分)正确答案B我的答案B评分5分

在窗体上画一个列表框和一个命令按钮，其名称分别为Listl和Command1,

然后编写如下事件过程：

PrivateSubForm_Load()

Listl.Addltem"Item1"

Listl.Addltem"Item2"

Listl.Addltem"Item3"

EndSub

PrivateSubCommandl_Click()

Listl.List(Listl.ListCount)="AAAA"

EndSub

程序运行后,单击命令按钮，其结果为O

A

把字符串"AAAA"添加到列表框中，但位置不能确定

B

把字符串"AAAA"添加到列表框的最后(即"Item3"的后面)

C

把列表框中原有的最后一项改为"AAAA"

D

把字符串"AAAA"插入到列表框的最前面(即"Item1"的前

面)

6/20单选题(5分)正确答案A我的答案A评分5分

在窗体上画一个名称为Listl的列表框，一个名称为Labell的标签，列表框中显示

若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的索引值。

下列能正确实现上述操作的程序是_________。

A

PrivateSubListl_Click()

Labell.Caption=Listl.Listindex

EndSub

B

PrivateSubListl_Click()

Labell.Name=Listl.Listindex

EndSub

c

.PrivateSubListl_Click()

Labell.Name=Listl.Text

EndSub

D

PrivateSubListl_Click()

Labell.Caption=Listl.Text

EndSub

7/20单选题(5分)正确答案C我的答案C评分5分

可以同时删除字符前导和尾部空白的函数是_____。

A

Ltrim

B

Rtrim

C

Trim

D

Mid

8/20单选题（5分）正确答案C我的答案C评分5分

在窗体上画一个文本框（其Name属性为Textl）,然后编写如下事件过程:

PrivateSubForm_Load（）

Textl.Text=""

Textl.SetFocus

Fori=1To10

Sum=Sum+i

Nexti

Textl.Text=Sum

EndSub

上述程序的运行结果是____o

A

在文本框Textl中输出55

B

在文本框Textl中输出0

C

出错

D

在文本框Textl中输出不定值

9/20单选题（5分）正确答案C我的答案C评分5分

以下是一个计算1-100之间所有奇数的和的程序，所缺部分应填。

DimSAsLong

DimXAsInteger

S=0

ForX=Step-2

S=S+X

NextX

PrintS

A

100To1

B

1To100

C

99To1

D

ITo99

10/20单选题（5分）正确答案B我的答案B评分5分

下列关于DO...LOOP语句的叙述中，不正确的是____________.

A

DO...LOOP语句采用逻辑表达式来控制循环体执行的次数。

B

DOWHILE...LOOP语句与DOUNTIL...LOOP语句中WHILE

与UNTIL后面的表达式值为TRUE或非0时循环继续。

C

DO…LOOPWHILE与DO…LOOPUNTIL语句者B至少执行一次

循环

D

DOWHILE...LOOP语句与DOUNTIL...LOOP语句可能不执行

循环

11/20单选题（5分）正确答案C我的答案C评分5分

要使循环至少执行一次,应使用循环。

A

FOR……NEXT

B

WHILE……WEND

C

DO……LOOPWHILE/UNTIL

D

DOWHILE/UNTIL……LOOP

12/20单选题（5分）正确答案A我的答案A评分5分

下列关于FOR循环的说法中，正确的是_____________。

A

循环变量、初值、终值和步长都必须是数值型

B

STEP后面的值必须为正数

C

初值必须小于终值

D

初值必须大于终值

13/20单选题（5分）正确答案A我的答案A评分5分

以下程序如果要求运行时只能循环3次，则所缺部分应填____。

X=1

DO

X=X+3

PRINTX

LOOPUNTIL

A