单项选择题

有如下程序: Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 arr=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10 If arE(i)/3=arr(i)\3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为______。

A.25
B.26
C.27
D.28
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Coramandl的命令按钮,然后编写如下程序; Dim SW As Boolean Function func(X As Integer)As Integer If X<20 Then Y=X Else Y=20+X End If func=Y End Function Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim a As Boolean SW=False End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) SW=True End Sub Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox( ) If SW Then Print flmc(intNum) End If End Sub 程序运行后,单击命令按钮,将显示一个输入对话框,如果在对话框中输入25,则程序的执行结果为
A.输出0
B.输出2
C.输出45
D.无任何输出
单项选择题
在软件生命周期法中,用户的参与主要在______。
A.软件定义期
B.软件开发期
C.软件维护期
D.整个软件生命周期过程中
相关试题
  • 设有如下记录类型:Type studentNumber A...
  • 本程序的功能是利用随机数函数模拟投币,方...
  • 如图16-10所示.在列表框List1中已经...
  • 数据是信息的符号表示,又称载体;信息是数...
  • 在窗体上画一个标签(名称为Label1)和一...