下面语句所定义的数组的元素的个数为_____。 Dim a(-1 To 5) As String
查看答案
下面程序段显示的结果是____。 Dim x% x=Int(Rnd+5) Select Case x Case 5:Print("优秀") Case 4:Print("良好") Case 3:Print("通过") Case Else:Print("不通过") End Select
A. 优秀
B. 良好
C. 通过
D. 不通过
下面程序段的执行结果为____。 Dim a!(3), i% For i = 0 To 3 a(i) = i + 1 Next i Print a(i)
A. 3
B. 4
C. 0
D. 提示“下标越界”错误
不能正确描述如下分段函数的If结构是_____。 ┏ ┃0 x<0 y =┃1 0≤x<1 ┃2 1≤x ┗
A. If x >= 1 Then y = 2 ElseIf x >= 0 And x < 1 Then y = 1 Else y = 0 End If
B. If x >= 1 Then y = 2 ElseIf x >= 0 And x < 1 Then y = 1 ElseIf x < 0 Then y = 0 End If
C. If x >= 1 Then y = 2 ElseIf x < 0 Then y = 0 Else y = 1 End If
D. If x < 1 Then y = 1 ElseIf x < 0 Then y = 0 Else y = 2 End If
为了计算2+4+6+...+100的值,某人编写了如下程序: Private Sub Form_Click() Dim k%, s% k = 2 s = 0 Do While k <= 100 k = k + 2: s = s + k Loop Print s End Sub 在调试时发现运行结果错误,需要修改。下列错误原因和修改方案中正确的是____。
A. Do-Loop循环语句错误,应改为For k=2 to 100 ...... Next k
B. 循环条件错误,应该改为Do While k<100
C. 循环前的赋值语句k=2错误,应改为k=1
D. 循环中两条赋值语句的顺序错误,应该改为s = s + k:k = k + 2