2009年春季浙江省计算机等级考试(VB).docVIP

2009年春浙江省高等学校 计算机等级考试试卷(二级Visual Basic) 说明： （1）请将所有试题的答案填写在试卷上。其中试题1~试题6在答卷上各小题正确选项的对应位置处填“√”： （2）请在答卷上填写学校名称、准考证号和姓名，并将你的准考证号的后五位填写在答卷右下角的指定位置内： （3）考试时间为90分钟。 试题1(每小题3分，共12分) 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。 【程序说明】输入n后，计算并显示下列表达式的值。 运行时初始界面如下图左所示，输入10并按回车键后的界面如下图中所示(输入数若 小于1则清空文本框，需重新输入)，按“计算”按钮后的界面如下图右所示。 【程序】 Dim n As Integer Private Sub Form_Load() Command1. Enabled=False End Sub Private Sub Text1_KeyPress (K As Integer) If K 13 Then Exit Sub n=Text1.Text If n 0 Then Command1.Enabled = True Text1.Enabled = False Else Text1.Text = End If End Sub Private Sub Command1_Click() Dim y As Single, i As Integer For i = 1 To n y=y+1/i Next i Label3.Caption = y Command1.Enabled = False Text1.Enabled = True Text1.Text = Text1.SetFocus End Sub 【供选择的答案】 （1）A、Enabled=True B、Enabled=False C、Visible=True D、Visible=False （2）A、 B、Text1_Click C、Text1_Change D、Text1_KeyDown （3）A、k=Text1.Text B、k=13 C、n=13 D、 （4）A、y=y+1/n B、y=y+1\n C、 D、y=y+1\i 试题2（每小题3分，共12分） 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。 【程序说明】运行时输入10个数后，输出其中较小的5个数。 【程序】 Private Sub Command1_Click() Dim a(10) As Single, t As Single, i As Byte, j As Byte, k As Byte For i = 1 To 10 a(i) = InputBox( a( i )= ) Next i For i = 1 To 9 k=i For j = i + 1 To 10 If a(j)a(k) Then k = j Next j t = a(i): a(i) = a(k): a(k) = t Next i For i = 1 To 5 Print a(i) Next i End Sub 【供选择的答案】 （5）A、 B、”a(“ + i + “)=” C、”a(“,i,”)=” D、”a(“;i;”)=” （6）A、 B、i=k C、k=i+1 D、i=k+1 （7）A、a(j)a(i) B、a(j)a(i) C、a(j)a(k) D、 （8）A、5 To 1 B、10 To 6 C、 D、5 To10 试题3（每小题3分，共12分） 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。 【程序说明】单击Commandl以通用对话框控件选择图象文件并加载，如下图左所示。单击图片框控件p1后，将以单击处为圆心、p1宽度的三分之一为半径的圆之外的区域改为白色。下图右是鼠标单击头像鼻翼处的