下面程序段执行结果为x=Int(Rnd() + 4)Select Case xCase 5Print "excellent"Case 4Print "good"Case 3Print "pass"Case ElsePrint "fail"End Select

试卷相关题目

• 1下列程序段的执行结果为a=1b=0Select Case aCase 1Select Case bCase 0Print "* *0* *"Case 1Print "* *1* *"End SelectCase 2Print "* *2* *"End Select

  A.* *0* *

  B.* * 1* *

  C.* *2* *

  D.0

  开始考试点击查看答案
• 2下列程序段的执行结果为a=95If a>60 Then I=1If a>70 Then I=2If a>80 Then I=3If a>90 Then I=4Print "I="; I

  A.I＝1

  B.I＝2

  C.I＝3

  D.I＝4

  开始考试点击查看答案
• 3通常情况下，垂直滚动条的值是

  A.由下往上递增

  B.由上往下递增

  C.由左到右递增

  D.由右到左递增

  开始考试点击查看答案
• 4设置命令按钮的属性时，只有将何属性设置为1，Picture属性才有效，否则无效、

  A.Style

  B.Caption

  C.Enabled

  D.Default

  开始考试点击查看答案
• 5设有如下过程：Sub ff(x，y，z，)x=y+zEnd Sub以下所有参数的虚实结合都是传址方式的调用语句是

  A.Call ff(5,7,z)

  B.Call ff(x,y,z)

  C.Call ff(3+x,5+y,z)

  D.Call ff(x+y,x-y,z)

  开始考试点击查看答案
• 6下列程序段的执行结果为a=6For k=1 To 0a=a + kNext kPrint k; a

  A.-1 6

  B.-1 16

  C.1 6

  D.11 21

  开始考试点击查看答案
• 7下列程序段的执行结果为a=1b=1For I=1 To 3f=a + ba=bb=fPrint f;Next I

  A.2 3 6

  B.2 3 5

  C.2 3 4

  D.2 2 8

  开始考试点击查看答案
• 8下列过程定义语句中，形参个数为不确定数量的过程是

  A.Private Sub Pro3(x As Double,y As Single)

  B.Private Sub Pro3(Arr(3),Option x,Option y)

  C.Private Sub Pro3(ByRef x,ByVal y,Arr( ))

  D.Private Sub Pro3(ParamArray Arr( ))

  开始考试点击查看答案
• 9单击命令按钮时，下列程序的执行结果为Private Sub Command1_Click()Dim x As Integer, y As Integerx=12: y=32Call PCS(x, y)Print x; yEnd SubPublic Sub PCS(ByVal n As Integer, ByVal m As Integer)n=n Mod 10m=m Mod 10End Sub

  A.12 32

  B.2 32

  C.2 3

  D.12 3

  开始考试点击查看答案
• 10单击一次命令按钮后，下列程序的执行结果是Private Sub Command1_Click()s=P(1) + P(2) + P(3) + P(4)Print sEnd SubPublic Function P(N As Integer)Static SumFor i=1 To NSum=Sum + iNext iP=SumEnd Function

  A.15

  B.25

  C.35

  D.45

  开始考试点击查看答案