栏目分类:
子分类:
返回
名师互学网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
名师互学网 > IT > 面试经验

[填空题] 下面运行程序后,单击命令按钮,输出的结果是______。 Private Sub Commandl_clck() Dim a%(1 To 4),b%(3 To 6),i%,s1#,s

面试经验 更新时间: 发布时间: IT归档 最新发布 模块sitemap 名妆网 法律咨询 聚返吧 英语巴士网 伯小乐 网商动力

[填空题] 下面运行程序后,单击命令按钮,输出的结果是______。  Private Sub Commandl_clck()   Dim a%(1 To 4),b%(3 To 6),i%,s1#,s

[填空题] 下面运行程序后,单击命令按钮,输出的结果是______。
Private Sub Commandl_clck()
Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2#
Fori=1 To 4
a(i)=i
Nexti
For i=3 To 6
b(i)=i
Nexti
s1=YAS(a)
S2=YAS(b)
Printt"s1=";S1"S2=";s2
End Sub
FunctionYAS(a()AsInteger)
Dimt#,i%
t=1
For i=LBound(a)ToUBound(a)
t=t*a(i)
Nexti
YAS=t
End Funtoon


参考答案:

S1=24 S2=360

问题解析:

解析无
转载请注明:文章转载自 www.mshxw.com
本文地址:https://www.mshxw.com/it/258853.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 (c)2021-2022 MSHXW.COM

ICP备案号:晋ICP备2021003244-6号