文档库

最新最全的文档下载
当前位置:文档库 > 省二VB笔试真题精讲

省二VB笔试真题精讲

1、运行以下程序后,输出结果为_______。C

x%=1/4

y%=11/4

PRINT x% ; y%

END

A. 0.25 0.75

B. 0 2

C. 0 3

D. 1 3

2、设a=1,b=2,c=3,d=4,则表达式IIf(a

A. 4

B. 3

C. 2

D. 1

3、阅读下面的程序段:

n1=InputBox("请输入第一个数:")

n2=InputBox("请输入第二个数:")

Print n1+n2

当输入分别为111和222时,程序输出为______。A

A. 111222

B. 222

C. 333

D. 程序出错

4、语句Print (a=2) And (b=-2) 的输出结果是_______。D

A. True

B. 结果不确定

C. -1

D. False

5、若x=1,执行语句If x Then x = 0 Else x = 1的结果是_______。D

A. 实时错误

B. 编译错误

C. x=1

D. x=0

6、下列程序的执行结果为______。2

A=75

If A>60 Then I=1

If A>70 Then I=2

If A>80 Then I=3

If A>90 Then I=4

Print I

7、在窗体的MouseUp事件中有下列程序代码:Hello!

Select Case Button

Case 1

Print "Ok!" "Hello!"

Case 2

Print "Hello!"

Case 4

Print "Welcome!"

End Select

运行此程序,当单击鼠标右键时,窗体显示______。

8、设输入的数据分别为14、3时,标签Label1中显示的值分别是_______。A

Private Sub Form_Click()

Dim a As Integer

a = Val(InputBox("请输入一个数"))

Select Case a Mod 5