单项选择题

有如下程序:
Option Base 1
Private Sub Form Click()
Dim arr,Sum
Sum=0
alt=Array(1,3,5,7,9,11,13,15,17,19)
For i=1 To 10
If arr(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
<上一题 目录 下一题>
热门 试题

单项选择题
在计算机中,算法是指 ______。
A.查询方法
B.加工方法
C.解题方案的准确而完整的描述
D.排序方法
单项选择题
在窗体上画两个标签和一个命令按钮,其名称分别为Labell、Label2和Command1,然后编写如下程序:Private Sub func(L As Label,ByVal a As Integer)L.Caption= 1234 a=a*aEnd SubPrivate Sub Form_Load()Label1.Caption= ABCD Label2.Caption=10End SubPrivate Sub Command1_Click()a=Val(Label2.Caption)Call func(Labell,A) Label2.Caption=aEnd Sub程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是 ______。
A.ABCD和10
B.1234和100
C.ABCD和100
D.1234和10
相关试题
  • 下面语句中能够打开随机文件的是
  • 在下列叙述中,不正确的一条是 ______。
  • 在窗体上画一个名称为Text1的文本框和一个...
  • 下列关于结构化设计方法的特点描述中,不正...
  • 在窗体上画4个文本框,并用这4个文本框建...