VB语言程序设计在线作业

VB语言程序设计一在线作业_4

交卷时间：2016-09-1916:18:56

一、单选题

1

(5分)

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

PrivateSubCommand1_Click()

Fori=1To4

x=4

Forj=1To3

x=3

Fork=1To2

x=x+6

Nextk

Nextj

Nexti

Printx

EndSub

程序运行后，单击命令按钮，输出结果是()o

□

A.15

□

B.7

□

C.538

□

D.157

纠错

得分：5

知识点：VB语言程序设计

展开解析

2

（5分）

以下能判断是否到达文件尾的函数是()O

a

A.Loc

□

B.BOF

□

C.LOF

□

D.EOF

纠错

得分：5

知识点：VB语言程序设计

展开解析

3

（5分）

下面的数1.21576654590569E+19写成普通的十进制数是（）。

□

A.12157665459056900000

□

B.121576654590569000

□

C.1215766545905690000

□

D.12157665459056900

纠错

得分：5

知识点：VB语言程序设计

展开解析

4

（5分）

在窗体上画两个文本框（Name属性分别为Textl和Text2）和一个命令按钮（Name属性为

CommandD,然后编写如下两个事件过程：

PrivateSubCommand1_Click（）

a=Text1.Text+Text2.Text

Printa

EndSub

PrivateSubForm_Load()

Textl.Text=""

Text2.Text=""

EndSub

程序运行后，在Textl和Text2中分别输入123和321,然后单击命令按钮，则输出结果为（）。

□

A.132231

□

B.321123

□

C.444

□

D.123321

纠错

得分：5

知识点：VB语言程序设计

展开解析

（5分）

删除列表框中指定的项目所使用的方法为()o

□

A.Remove

□

B.Moveitem

□

C.Move

□

D.Removeitem

纠错

得分：5

知识点：VB语言程序设计

展开解析

6

（5分）

以下语句的输出结果是（）O（△表示空格）

a=27

b=65

Printa;b

□

A.A27AA65

□

B.27AA65

□

C.27A65

□

D.△27A65

纠错

得分：5

知识点：VB语言程序设计

展开解析

7

（5分）

为了装入一个VB应用程序，应当()。

□

A.只装入窗体文件(.frm)

□

B.只装入工程文件(.vbp)

□

C.分别装入工程文件和标准模块文件(.bas)

□

分别装入工程文件、窗体文件和标准模块文件

纠错

得分：5

知识点：VB语言程序设计

展开解析

8

(5分)

下列代码的运行结果是OO

lf3-2Then

a=10

Elself(10/2)=6Then

a=20

Else

a=30

EndIf

Printa

□

A.30

□

B.10

□

C.20

□

D.不确定

纠错

得分：5

知识点：VB语言程序设计

展开解析

9

（5分）

下面的数2.65358979335278E-06写成普通的十进制数是（）。

1

A.0.00000265358979335278

□

B.0.0000265358979335278

□

C.0.000000265358979335278

□

D.0.000265358979335278

纠错

得分：5

知识点：VB语言程序设计

展开解析

10

（5分）

当一个工程含有多个窗体时，其中的启动窗体是（）。

□

A.第一个添加的窗体

□

B.在“工程属性"对话框中指定的窗体

□

C.最后一个添加的窗体

□

D.启动VisualBasic时建立的窗体

纠错

得分：5

知识点：VB语言程序设计

展开解析

11

（5分）

假定有如下的窗体事件过程:

PrivateSubCommand1_Click()

a="VisualBasic程序设计”

b=Left(a,6)

c=Mid(a,8)

MsgBoxb,34,c

EndSub

程序运行后，单击命令按钮，则在弹出的消息框的标题栏中显示的信息是OO

□

A.Basic

□

B.34

□

C.Visual

□

D.Basic程序设计

纠错

得分：5

知识点：VB语言程序设计

展开解析

12

（5分）

下列操作中不能向工程中添加窗体的是（）。

□

A.右击窗体，在弹出的菜单中选择“添加窗体”命令

□

B.单击工具栏上的“添加窗体"按钮

□

C.执行"工程"菜单中的"添加窗体"命令

D.右击工程资源管理器，在弹出的菜单中选择"添加"命令，然后在下一级菜单中选择"添加窗

□

体"命令

纠错

得分：5

知识点：VB语言程序设计

展开解析

13

（5分）

下列程序的执行结果为（）。

x=15

Ifx>0Thena=1

Ifx>10Thena=2

Ifx>20Thena=3

Ifx>30Thena=4

Printa

□

A.

□

B.2

□

C.3

□

D.4

纠错

得分：5

知识点：VB语言程序设计

展开解析

14

（5分）

执行语句‘Print#1,123;“hell。””后，相应的顺序文件内被写入的内容是（）。

□

A.123hello

a

B.123"hello"

□

C.123,hello

a

D."123hello"

纠错

得分：5

知识点：VB语言程序设计

展开解析

15

(5分)

执行下面的程序段后，X的值为()O

x=5

Fori=1To20Step2

x=x+i5

Nexti

□

A.24

□

B.25

□

C.21

□

D.20

纠错

得分：5

知识点：VB语言程序设计

展开解析

16

（5分）

不在VB启动时的常用控件工具箱中的控件是()o

□

A.OLE

□

B.CommonDialog

□

C.Shape

□

D.Timer

纠错

得分：5

知识点：VB语言程序设计

展开解析

17

（5分）

VisualBasic集成环境的主窗口中不包括（）。

a

A.工具栏

□

B.状态栏

□

C.标题栏

□

D.菜单栏

纠错

得分：5

知识点：VB语言程序设计

展开解析

18

(5分)

当拖动滚动条中的滚动块时，将触发滚动条的事件是()O

□

A.SetFocus

□

B.Change

□

C.Scroll

0

D.Move

纠错

得分：5

知识点：VB语言程序设计

展开解析

19

(5分)

阅读下面的程序：

PrivateSubForm_Click()

Dimm,nAsInteger

m=lnputBox("请输入M的值”)

m=Val(m)

ml=m

n=InputBox。'请输入N的值”)

n=Val(n)

n1=n

DoWhilen<>0

remin=mModn

m=n

n=remin

Loop

Printml,n1,m

EndSub

程序运行后，单击窗体，在输入对话框中分别输入16和24,在程序在窗体上的输出结果为()o