VB求和1!+2!+3!+...+x!x是最小正整数数,通过键盘输入,值不超过17。运行时单击窗体,使用print方法在窗体上

VB题目 我要尽可能的详细解释,20分!! 3.运行下面的程序,单击Cmd1,窗体上显示的第一行是_百度知道
VB题目 我要尽可能的详细解释,20分!! 3.运行下面的程序,单击Cmd1,窗体上显示的第一行是
! 3VB题目 我要尽可能的详细解释,单击Cmd1;End SubPrivate Sub Sub1(X As Integer)
If X&lt。Option ExplicitPrivate Sub Cmd1_Click()
Dim A As Integer
Call Sub1(A)
Print A&#160,窗体上显示的第一行是___(7)___,20分.运行下面的程序,第二行是___(8)___ ,最后一行是___(9)___!
提问者采纳
&将A副职为3&nbsp,点击Cmd1时执行这里的代码Private& &定义一个整型变量A&&#39; &nbsp.&#39. A& &Explicit& &nbsp:316363解释如下;SubSub1解释如图,即使用未声明的变量将报错&#39.jpg" target="_blank" title="点击查看大图" class="ikqb_img_alink"><img class="ikqb_img" src=" &nbsp输出结果为;Sub1(A)&/zhidao/wh%3D450%2C600/sign=997b8a9dc1f4/caef76094b36acaf666e8ed77dd98da; & &/zhidao/wh%3D600%2C800/sign=e251fe2a2ecfe97b6e52f/caef76094b36acaf666e8ed77dd98da;& & Call& Print&&&nbsp://a; &&#39; & Dim&Sub&调用过程Sub1&nbsp. & &nbsp:<a href="& & && &3&nbsp://a;强制进行变量声明;As& & && &#39://a;Integer& & &A& &Cmd1的点击事件:/zhidao/pic/item/caef76094b36acaf666e8ed77dd98da;Cmd1_Click()& & & & &=& &nbsp.baidu. & &#39.jpg" esrc=" &输出A的值End& &nbsp
其他类似问题
按默认排序
其他3条回答
316363****************A=3X=3X=7X=15X=15X=31Print XX=63Print XA=63Print A****************
结果是:一行31 二行63 三行 63程序从A=3 进入函数 Sub1(3) 得 x=3*2+1=7 因7&10 then 再次调用函数 Sub1(7)
得 x=7*2+1=15
因x&10所以跳到 x=15*2+1=31 输出31这时再回到第一次的 end if 后面执行x=31*2+1=63输出63再回到Private Sub Cmd1_Click()中输出63
第一行:31第二行:7第三行:3详细过程见附图
你做错了,答案是31 63 63
恩 我确实做错了!
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁2014 VB 实验教学大纲xsb_百度文库
两大类热门资源免费畅读
续费一年阅读会员,立省24元!
评价文档:
6页免费8页免费5页免费5页免费5页免费5页免费10页免费11页免费7页免费9页免费
喜欢此文档的还喜欢7页免费5页免费8页免费183页免费75页免费
2014 VB 实验教学大纲xsb|
把文档贴到Blog、BBS或个人站等:
普通尺寸(450*500pix)
较大尺寸(630*500pix)
你可能喜欢郑州大学2013vb机试题库2_百度文库
两大类热门资源免费畅读
续费一年阅读会员,立省24元!
评价文档:
8页免费13页1下载券10页1下载券5页免费14页1下载券13页1下载券22页免费13页1下载券13页1下载券54页3下载券
喜欢此文档的还喜欢8页免费40页免费14页免费4页免费126页免费
郑州大学2013vb机试题库2|最&#8203;新&#8203;郑&#8203;州&#8203;大&#8203;学&#8203;v&#8203;b&#8203;考&#8203;试&#8203;题&#8203;库&#8203;集&#8203;之&#8203;2
把文档贴到Blog、BBS或个人站等:
普通尺寸(450*500pix)
较大尺寸(630*500pix)
你可能喜欢

我要回帖

更多关于 三个连续正整数 的文章

 

随机推荐