赞题库-背景图
单项选择题

有以下程序代码: Const NUM As Integer=5 Private Sub Form Click() Dim a As Integer,b As Integer a=1:b=NUM Do a=a+b b=b+l Loop Until b>NUM Print a End Sub 当程序运行时,单击窗体产生的输出结果是( )。

A.5
B.1
C.6
D.出错
<上一题 目录 下一题>
热门试题

单项选择题编写如下程序代码: Private Sub Command1_Click() Call sub pro End Sub Sub sub pro() Static sum As Integer Dim i As Integer For i=l To 10 Step 2 sum=sum+i Next Print sum End Sub 程序运行后,第三次单击命令按钮Command1时,输出结果为( )。

A.25
B.75
C.55
D.165

单项选择题分段函数入下:设x中已经有一个数值。下列程序段中,能正确计算y值的是( )。

A.Select Case x Case Is<0 y=一1 Case Is<10 y=0 Case Else y=1 End Select
B.Select Case x Case Is<0 y=一1 Case Is>=0,Is<10 y=0 Case Is>=10 y=1 End Select
C.Select Case x Case x<0 y=一1 Case x<10 y=0 Case Else y=1 End Select
D.Select Case x Case x<0 y=一1 Case x>=0 And x<10 y=0 Case Else y=1 End Select