未知题型
在窗体上画一个名为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr = Array(1,2,3,4,5) j=1 For i = 5 To 1 Step -1 S = S + Art(i) * j j =j * 10 Next Print S End Sub 程序运行后,单击命令按钮,输出结果为( )。
D.345
- A.54321
B.123
C.12345
【参考答案】
C
解析:本题考查使用Array函数给数组元素赋值的应用。分析程序可知,是通过For循环将数组中的各个元素通过一......
(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
点击查看答案
相关考题
-
多项选择题
下列各项业务会引起应收账款账面价值变动的有( )。 A. 计提减值准备 B. 计提坏账准备 C. 代购货方垫付的包装费 D. 租入包装物支付的押金 -
未知题型
A公司对外负债130万元,另有30万元的货款未予追回(欠款人为D公司)。2000年3月A公司经全体股东同意分立为B、C两个公司,由B承受A公司的全部债权债务,并办理变更登记与公告。同年4月,B、C签订协议,约定A公司对D公司的30万元债权由C享有。同年5月,C向法院起诉D,要求归还30万元货款。有关该案的正确表述是下列哪项?( )D.B、C之间的协议有效,但D有权选择向B或C履行义务
A.B、C之间的协议有效,D应向C偿还30万元货款
B.B、C之间的协议有效,但未经通知,C无权向D追索货款
C.B、C之间的协议有效,但不得对抗善意第三人,故C无权向D追索货款 -
判断题
土壤样品制备的主要步骤包括:烘干、磨细、过筛 正确错误
