计算机高职单招vb ppt,高职单招计算机VB部分测试

高职第三次测试

座号：__________姓名：__________成绩：__________

一、阅读分析题(阅读分析下面VB程序，将正确的运行结果填入指定的下划线上。每 c=a*10+b case 1 to 9 c=a*100+b 题6分，共72分)

1、窗体上有一个名为Command1的命令按钮，并有下面的程序： Private Sub Command1_Click() a = 24: b =32

a = a + b b = a - b a = a - b Print a, b End Sub

程序运行时，单击命令按钮后，则显示的结果是： 2、窗体上有一个名为Command1的命令按钮，并有下面的程序： Private Sub Command1_Click()

a = "123": b = "456" c = Val(a) + Val(b) Print c \ 100 End Sub

程序运行时，单击命令按钮后，则显示的结果是： 3、窗体上有一个名为Command1的命令按钮，并有下面的程序： Private Sub Command1_Click()

Dim a, b As Integer a = 13 b = 6

Print Abs(a \ b - a) End Sub

程序运行时，单击命令按钮后，则显示的结果是： 。 4． 有如下程序： Private Sub Form_Click() A=24 b=328

select case b\10 case 0

case 10 to 99 c=a*1000+b end select End Sub

程序运行后，单击窗体，输出结果为 _______。

5． 在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程： Private Sub Command1_Click()

x = 5 y = -20

If Not x > 0 Then x = y - 3

Else

y = x + 3

Print x - y; y -x

End If End Sub

程序运行后，单击命令按钮，要求在窗体上显示如下内容_______。 6．在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程：Private Sub Command1_Click() b=1

Do while (b<40)

b=b*(b+1) Loop Print b End Sub

运行程序后，直接按回车键，屏幕显示的结果是：____________

7．在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程：Private Sub Command1_Click() x=0

For i=1 to 5 For j=i to 5 x=x+1

第 1 页 共 3 页