三九宝宝网宝宝百科宝宝知识

二级VB模拟试卷四

11月04日 编辑 39baobao.com

[科教版二年语文下学期期末基础测试卷]2012-2013学年度下学期二年级语文期末测试卷 题号 基础乐园 课外拓展 阅读与写作 卷面分 总分 一 二 三 四 五 六 七 八 九 得分 ☆基 础 乐 园☆一、我会拼,我会写,我会写的...+阅读

一、选择题:35题,2分/题,共70分

下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确选项涂写在答题卡相应位置上,答在试卷上不得分。

1.执行以下程序段后,变量c的值为( )

a = " Visual Basic Programing"

b = "Quick"

c =b

print m2

End Sub

程序运行后,按回车键,输出结果为( )

A)48 4

B)237 1

C)587 3

D)498 4

分析:

5.Visual Basic 中没有提供下列( )事件

A)MouseDown

B)MouseUp

C)MouseMove

D)MouseExit

分析:

6.执行下面对面的程序后,X的值为( )

x=50

Fox i=1 To 20 Step 2

x=x+i\5

Next i

A)66

B)67

C)68

D)69

分析:

7.为了防止用户随意将光标置于控件之上,需做的工作是( )

A)将控件的Enabled属性设置为False

B)将控件的TabStop属性设置为False

C)将控件的TabStop属性设置为True

D)将控件的TabIndex属性设置为0

分析:

8.表达式String(2,"Shanghai")的值是( )

A) Sh

B) Shanghai

C) ShanghaiShanghai

D) SS

分析:

9.为了在按回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( )

A) value

B) Defaul

C) Cancel

D) Enabed

分析:

10.visual Basic 提供的缺省窗体包含( )

A) 标题栏

B)菜单栏

C)工具条

D)状态栏

分析:

11.假定有一个菜单项,名为MenuItem,为了在运行时该菜单项失效(变灰),应使用的语句为( )

A)MenuItem.Enabled=False

B)MenuItem.Enabled=True

C)MenuItem.Visible=True

D)MenuItem.Visible=False

分析:

12.下列不能打开菜单编辑器的操作是( )

A)按Ctrl+E

B)单击工具栏中的“菜单编辑器”按钮

C)执行“工具”菜单中的“菜单编辑器”命令

D)按Shift+Alt+M

分析:

13.列表框(如图2-6所示)经过下列操作后,剩余的项目是( )

Listl.RemoveItem l

Listl.RemoveItem 2

Listl.RemoveItem l

A)aa

B)bb

C)cc

D)dd

分析:

14.要暂时关闭计时器,应把计时器的某个属性设置为False,这个属性是( )

A)Visible

B)Timer

C)Enabled

D)Interval

分析:

15.InputBox函数返回值的类型为( )

A)数值

B)字符串

C)变体

D)数值或字符串(视输入的数据而定)

分析:

16.当窗体的AutoRedraw属性采用默认值时,若在窗体装入时使用绘图方法绘制图形,则应将程序放在( )

A)Paint事件

B)Load事件

C)Initilize事件

D)Click事件

分析:

17.下列可以打开立即窗口的操作是( )

A)Ctrl+D

B)Ctrl+E

C)Ctrl+F

D)Ctrl+G

分析:

18.如是要向工具箱中加入控件和部件,可以利用“工程”的菜单中的( )命令

A)引用

B)部件

C)工程属性

D)添加窗体

分析:

19.若要清除列表框的所有内容,可用来实现的方法是( )

A)Removeitem

B)Cls

C)Clear

D)以上均不可以

分析:

20.假定有下面的过程:

Function Func(a As Integer,b As Integer)As Integer

Static m As Integer, i As Integer

m = 0

i = 2

i = i + m +1

m = i + a + b

Func = m

End Function

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

Private Sub mandl_Click()

Dim k As Integer, m As Integer

Dim p As Integer

k=4

m=1

p=Func(k,m)

Print p;

p=Func(k,m)

Print p

End Sub

程序运行后,单击命令按钮,输出结果为( )。

A)8 17

B)8 16

C)8 20

D)8 8

分析: 21.如何使图象(Image)控件中的图像自动适应控件的大小?( )

A)将控件的AutoSize属性主,设为True

B)将控件的AutoSize属性设为False

C)将控件的Stretch属性设为True

D)将控件的Strech属性设为False

分析:

22.当对DrawWidth进行设置后,将影响( )。

A)Line、Circle、Pset方法

B)Line、Shape控件

C)Line、Circle、Point方法

D)Line、Circle、Pset方法和Line、Shape控件

分析:

23.以下语句的输出结果是( )。

Print Format(32548.5,″000,000.00″)

A)23548.5

B)32,548.5

C)032,548.50

D)32,548.50

分析:

24.执行下列语句后整型变量a的值是多少?( )

If(3-2)>2 Then

a=10

ElseIf(10/2)=6 Then

a=20

Else

a=30

End If

A)10

B)20

C)30

D)不确定

分析:

25.在代码中定义了一个子过程:

Sub P(a,b)

End Sub

下面( )调用该过程的格式是正确的。

A)Call P

B)Call P 10,20

C)Call P(10,20)

D)P(10,20)

分析:

26.阅读下面的程序段:

For i=1 To 3

For j=1 To i

For k=j To 4

a=a+1

Next k

Next j

Next i

执行上面的三重循坏后,a的值为( )。

A)9

B)14

C)20

D)21

分析:

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

Private Sub Form_Load()

Textl.Text=""

Textl.SetFocus

For i= l To 9

Sum=Sum+i

Next i

Textl.Text=Sum

End Sub

上述程序的运行结果是( )。

A)在文本框Textl中输出45

B)在文本框Textl中输出0

C)出错

D)在文本框Textl中输出不定值

分析: 28.在窗体(Name属性为Forml)上画两个文本框(其Name属性分别为Textl和

Text2)和一个命令按钮(Name属性为mandl),然后编写如下两个事件过程:

Private Sub mandl_Click()

a=Textl.Text+Text2.Text

Print a

End Sub

Private Sub Form_Load()

Textl.Text=""

Text2.Text=""

End Sub

程序运行后,在第一个文本框(Textl)和第二个文本框(Text2)中分别输入78和87,然后单击命令按钮,则输出结果为( )。

A)165

B)8778

C)7788

D)7887

分析:

29.对变量名说法不确的是( )。

A)必须是字母开头,不能是数字或其他字符

B)不能是Visual Basic的保留字

C)可以包含字母、数字、下划线和标点符号

D)不能超过255个字符

分析:

30.下面关于多重窗体的叙述中,正确的是( )。

A)作为启动对象的Main子过程只能放在窗体模块中

B)如果启动对象是Main子过程,则程序启动时不加载任何窗体,以后由该过 程根据不同情况决定是否加载及加载哪一个窗体

C)没有启动窗体,程序不能运行

D)以上都不对

分析:

31.为了在运行时能显示窗体左上角的控制框(系统菜单),必须( )。

A)把窗体的ControlBox属性设置为False,其他属性任意

B)把窗体的ControlBox属性设置为True,并且把BoderStyle属性设置为1

5

C)把窗体的ControlBox属性设置为False,同时把BoderStyle属性设置为非0值

D)把窗体的ControlBox属性设置为True,同时把BoderStyle属性设置为0值

分析:

32.阅读程序:

Sub subP(b() As Integer)

For i=l To 4

b=(i)=2*i

Next i

End Sub

Private Sub mandl_Clik()

Dim a(l To 4)As Integer

a(1)=5

a(2)=6

a(3)=7

a(4)=8

subP a()

For i=l To 4

Print a(i);

Next i

End Sub

运行上面的程序,单击命令按钮,输出结果为( )。

A)2 4 6 8

B)5 6 7 8

C)10 12 14 16

D)出错

分析:

33.monDialog控件可以显示( )对话框。

A)4种

B)5种

C)6种

D)7种

分析:

34.在设计应用程序时,通过( )窗口可以查看到应用程序工程中的所有组成部分。

A)代码窗口

B)窗体设计窗口

C)属性窗口

D)工程资源管理器窗口

分析:

35.假定时钟控件的Interval属性为1000,Enabled属性为True,并且有下面的事件过程,计算机将发出( )beep声。

Sub Timerl_Timer()

For i=l to 10

Beep

Next i

End Sub

A)1000次

B)10000次

C)10次

D)以上都不对

分析:

二、填空:每空2分,共30分。

请将正确答案分别写在答题卡中序号为[1]至[15]的横线上,答在试卷

上不得分。

1.在3种不同类型的组合框中,只能选择而不能输入数据的组合框是[1] 。

2.假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为

Form2,启动窗体为Forml。

在Forml上画一个命令按钮mandl,程序运行后,要求当单击命令按钮时,Forml窗体消失,显示窗体Form2,请将程序补充完整。

Private Sub mandl_Click()

[2] Forml

Form2 [3]

End Sub

3.执行下面的程序段后,s的值为[4]。

s=5

For i=2.6 to 4.9 Step 0.6

s=s+l

Nest i

4.把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:

Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)

Print KeyCode;

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)

Print KeyAscii

End Sub

程序运行后,如果按下a键,则在窗体上输出的数值为[5]和[6]。

5.语句Print 5*5\5/5的输出结果是[7]。

6.程序执行结果s的值是 [8] 。

Private Sub mandl_Click()

i = 0

Do

i = i + l

s = i + s

Loop Until i >= 4

Print s

End Sub

7.表达式Fix(-12.08)+Int(-23.82)的值为[9]。

8.在窗体上画一个命令按钮(其Name属性为mandl),然后编写如下代码:

Private Sub mandl_Click()

Dim M(10) As Integer

For k=1 to 10

M(k)=12-k

Next k

x=6

Print M(2+M(X))

End Sub

程序运行后,单击命令按钮,输出结果是[10]。

9.假定有一个名为pic2.gif的图形文件,要在运行期间把该文件装入一个图片框(Picturel),应执行的语句是[11]。

10.控件和窗体的Name属性只能通过[12]设置,不能在[13]期间设置。

11.假定当前日期为2002年12月16日,星期一,则执行以下语句后,输出结果

16、

12、200

2、[14]。

Print Day(Now)

print Month(Now)

print Year(Now)

Print Weekday(Now)

12、要想在文本框中显示垂直滚动条,必须把[15]属性设置为2,同时还应把

Multiline属性设置为True。

二级VB模拟试卷

(四)参考答案

一、(1)D (2)D (3)A (4)C (5)D (6)A (7)A (8)D (9)B (10)A (11)A (12)D (13)A (14)C (15)B (16)A

(17)D (18)B (19)C (20)D (21)C (22)A (23)C (24)C (25)C (26)C (27)C (28)D (29)C (30)B

(31)B (32)A (33)C (34)D (35)D

分析:

二、[1]下拉式列表框(或下拉式) [2]Unload [3]Show [4]9 [5]65 [6]97 [7]25 [8]10 [9]-36

[10]14 [11]Picturel.Picture=LoadPicture("pic2.gif") [12]设计期间

[13]程序运行(或运行) [14]2 [15]Scrollbars

以下为关联文档:

人教版语文下册第五单元试卷班别:_____ 座号:_____ 得分:_____一、看拼音,写汉字。(20分)yīn w i xi nɡ duō fǎy nɡ ɡuānɡ l zu h udiǎn t u liǎn蛋二、比一比,再组组词。(16分)办( )很...

一级建造师铁路工程模拟试卷三、案例分析题(共5题,前3题各20分,后2题各30分) (一) 背景资料 某项铁路工程项目为营业线线路,根据实际地形还需设计桥涵、隧道等,下面就施工安全控制的有关内容提出以下问题 问题:...

2008年一级建造师全真模拟题试卷二、多项选择题(共20题,每题2分,每题的备选项中,有2个或2个以上符合题意,至少有1个错项。错选,本题不得分;少选,所选的每个选项得0.5分) 61.在经营成本中,其他费用主要是指(BCDE)。 A.其他...

2008年一级建造师模拟试卷【案例3】 某建筑公司承接一项综合楼任务,建筑面积100828m ,地下3层,地上26层,箱形基础,主体为框架一剪力墙结构。该项目地处城市主要街道交叉路口,是该地区的标志性建筑物。因此,...

2007年3月高口笔试试卷Part A: Spot Dictation Direction: In this part of the test, you will hear a passage and read the same passage with blanks in it. Fill in each of the blanks with...

一级建造师模拟试卷及讲解三、案例题 某12层商务酒店工程,业主通过公开招标与某建筑公司签订了土建工程施工合同,合同工期310天。合同中约定,工期每提前一天,奖励施工单位8000元。施工单位按时提交了单位...

一级建造师铁路工程模拟试卷三、案例分析题(共5题,前3题各20分,后2题各30分) (一) 背景资料 某施工企业承包了一段既有线铁路改造工程,内容有桥涵、路基和轨道等。工程开工后,该施工企业未经业主同意便把某桥涵...

全国珠心算普十级试卷全国珠心算等级鉴定十级试卷 姓名 对题 要求 限时5分钟,对8题为十级 卷号 ① ② ③ ④ ⑤ ⑥ ⑦ ⑧ ⑨ ⑩ 9 6 14 25 96 5 50 10 70 5 20 10 5 -7 -8 70 6 -2 29 7 6 8 40 9...

批六语试卷两天的短暂的假期,与暴雪的天气擦肩而过,今天大家又来到学校批试卷了,车行驶到一半的路程,开始飘起了雪花。来到学校,刚拿到试卷时,发现雪已经纷纷扬扬了,从北边窗户望去,房顶上都覆...

推荐阅读
图文推荐