单项选择题
阅读下列程序: Function func(n As Integer)As Integer Sum = 0 For i = 1 To n Sum = Sum + (i + 1)* i Next i func = Sum End Function. Private Sub Command1_Click () Dim a As Integer a= 5 s = func (A) Print s End Sub 程序运行后,单击命令按钮,输出的结果为
A.80
B.60
C.70
D.15
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
对采用二分查找法进行查找运算的查找表,要求按 ______ 方式进行存储。
A.顺序存储
B.链式存储
C.顺序存储且结点按关键字有序
D.链式存储且结点按关键字有序
点击查看答案&解析
单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Static a As Integer,b As Integer Cls b = b + 3 a = a + b Print a,b End Sub 程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为
A.8 16
B.6 6
C.15 18
D.18 9
点击查看答案&解析
相关试题
下列程序的功能是将数组中的奇数相加。给定...
有下列程序:Private Sub Command1_Cli...
能判断是否到达文件尾的函数是 【12】 。
以下程序用宋输出20个在开区间(10,8...
在Visual Basic中,用于管理文件系统的3...