下列程序运行后的输出结果是【】。 Private Sub f(k，s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Comman

admin2009-03-15 68

问题下列程序运行后的输出结果是【  】。
Private Sub f(k，s)
   s=1
   For j=1 To k
      s=s*j
   Next
End Sub
Private Sub Command1_Click()
   Sum=0
   For i=1 To 3
      Call f(i，s)
      Sum=Sum+s
   Next
   Print Sum
End Sub

选项

答案9

解析本题的重点是在子过程的调用过程中，虚实参数的传送问题，变量s按十传送。子过程f()求n!， sum的计算过程为1!+2!+3!=1+2+6=9

转载请注明原文地址:https://kaotiyun.com/show/JD1p777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

对java的继承机制描述错误的是()
下面不属于软件设计原则的是()
下列关于J2SE体系结构的说法中错误的是()。
以下说法正确的是()。
若要求尽可能快地对实数数组进行稳定的排序，则应选()。
程序、进程和线程3个概念之间的关系是()。
执行下列语句后，i和n的值为()inti＝10；intn＝i++%5；
下列关系模型中，能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是()
【】是运行Java小应用程序的一个软件单元，对Java小应用程序的访问权限加以限制。
设有关系R(S，D，M)，其函数依赖集F={S→M，D→M)，则关系R至少满足()。

随机试题

下列哪一项不是积证的特征()
宿主状态是遗传因素与下列哪种因素终生相互作用的结果
系统疾病史包括()
某法院在审理张某自诉伤害案中，发现被告人还实施过抢劫。对此，下列哪一做法是正确的?(2010年卷二31题，单选)
会计电算化改变了内部控制制度的控制方式、控制对象和许多具体制度。()
E股票和F股票不同时涨；如果F股票不涨，那么E股票涨；如果E股票不涨，那么F股票也不涨。据此，可以推出()。
公园里健行步道长1千米，步道一边从起点开始按照4棵梧桐树1棵柳树的顺序均匀地种了501棵树。小王从步道起点以5米／秒的速度开始跑步，3分钟后，小王经过多少棵柳树?
A．促胃液素B．缩胆囊素C．促胰液素D．抑胃肽E．促胃动素可促进胆囊收缩和胰酶分泌的胃肠激素是
“文档”选项卡显示项目管理器里的表单、标签和______组件。
WhoismostlikelytogethookedinInternet?

最新回复(0)

下列程序运行后的输出结果是【 】。 Private Sub f(k，s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Comman

二级VB

NCRE全国计算机二级

对java的继承机制描述错误的是()

下面不属于软件设计原则的是()

下列关于J2SE体系结构的说法中错误的是()。

以下说法正确的是()。

若要求尽可能快地对实数数组进行稳定的排序，则应选()。

程序、进程和线程3个概念之间的关系是()。

执行下列语句后，i和n的值为()inti＝10；intn＝i++%5；

下列关系模型中，能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是()

【】是运行Java小应用程序的一个软件单元，对Java小应用程序的访问权限加以限制。

设有关系R(S，D，M)，其函数依赖集F={S→M，D→M)，则关系R至少满足()。

下列哪一项不是积证的特征()

宿主状态是遗传因素与下列哪种因素终生相互作用的结果

系统疾病史包括()

某法院在审理张某自诉伤害案中，发现被告人还实施过抢劫。对此，下列哪一做法是正确的?(2010年卷二31题，单选)

会计电算化改变了内部控制制度的控制方式、控制对象和许多具体制度。()

E股票和F股票不同时涨；如果F股票不涨，那么E股票涨；如果E股票不涨，那么F股票也不涨。据此，可以推出()。

公园里健行步道长1千米，步道一边从起点开始按照4棵梧桐树1棵柳树的顺序均匀地种了501棵树。小王从步道起点以5米／秒的速度开始跑步，3分钟后，小王经过多少棵柳树?

A．促胃液素B．缩胆囊素C．促胰液素D．抑胃肽E．促胃动素可促进胆囊收缩和胰酶分泌的胃肠激素是

“文档”选项卡显示项目管理器里的表单、标签和______组件。

WhoismostlikelytogethookedinInternet?

下列程序运行后的输出结果是【】。 Private Sub f(k，s) s=1 For j=1 To k s=s*j Next End Sub Private Sub Comman