程序设计试卷及答案

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

1.当运行程序时,系统自动执行启动窗体的某个事件过程。这个事件过程是()

A)Load

B)Click

C)Unload

D)GotFocus

2.无论何控件,都具有一个共同属性。这个属性是()

A)Text

B)Font

C)Name

D)Caption

3.在一行内写多条语句时,语句之间要用某个符号分隔。这个符号是()

A),

B);

C)、

D):

4.表达式3∧2*2+3 MOD 10\4的值是()

A)18

B)1

C)19

D)0

5.下面的变量名合法的是()

A)k_name

B)k ame

C)name

D)k-name

6.设有如下变量声明Dim time1 As Date,为变量time1正确赋值的表达式是()

A)time1 = #11:34:04 #

B)time1 = Format(Time,"yy:mm:dd")

C)time1 = #"11:34:04"#

D)time1 = Format("hh:mm:ss",Time)

7.表达式12000 + "129" & 200的值是()

A)12329

B)"12129200"

C)"12000129200"

D)"12329"

8.若设a = 4,b = 5,则下列表达式值为真的是()

A)(True+a)>0 And b>10

B)a>b Or b>10-a

C)(False-b< 0) Eqv (a>b)

D)a>b Xor b+3>5

9.当窗体上的文字或图形被覆盖或最小化后能恢复原貌,需要设置窗体的属性是()

A)Appearance

B)Visible

C)Enable

D)Autoredraw

10.在窗体上画一个名称为Command1的命令按钮,编写以列程序:

Private Sub Command1_Click( )

Dim a As Integer

Static b As Integer

a = a + b

b = b + 4

Print a,b

End Sub

程序运行后,单击该命令按钮三次,屏幕上显示的值是()

A)4 12

B)0 4

C)4 8

D)8 12

11.Visual Basic是一种面向对象的程序设计语言,构成对象的三要素是()

A)属性、控件和方法

B)属性、事件和方法

C)窗体、控件和过程

D)控件、过程和模块

12.下列程序段错误的是()

A)Dim a As Integer

a = array(1,2,3,4)

B)Dim a(),b()

a = array(1,2,3,4):

b = a

C)Dim a As Variant

a = array(1,"asd",true)

D)Dim a() As Variant

a = array(1,2,3,4)

13.表达式String(1,"I am student") + Replace("am harass","rass","ppy") & "!"的值是()

A)"I am happy!"

B)"I am student I am s am harass studentam happy!"

C)"I am student am harass!"

D)"I am student am happy!"

14.下列程序段中,能正常结束循环的是()

A)I = 1

Do

I = I + 2

Loop Until I = 10

B)I = 5

Do

I = I + 1

Loop Until I < 0

C)I = 10

Do

I = I + 1

Loop Until I > 0

D)I = 6

Do

I = I - 2

Loop Until I = 1

15.引用列表框(List1)最后一个数据项应使用的表达式是()

A)List1.List(List1.ListCount)

B)List1.List(List1.ListCount-1)

C)List1.List(ListCount)

D)List1.List(ListCount-1)

16.有如下程序:

Option Base 1

Private Sub Command1_Click()

Dim x,y(3,3)

x = Array(1,2,3,4,5,6,7,8,9)

For i = 1 To 3

For j = 1 To 3

y(i,j) = x(i*j)

If(j > = i) Then Print y(i,j);

Next j

Print

Next i

End Sub

运行时输入出的结果是()

A)1 2 3

2 4 6

4 6 8

B)1 2 3

2 4 6

3 6 9

C)1

相关文档
最新文档