首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp。该程序的功能是计算M!+(M+1)!+(M+2)!+…+N!之和。窗体上有名称分别为Textl、Text2的两个文本框,用于接收输入的M和N(要求M<N)。单击名称为Commandl、标题为“计算”的命令按钮,
在考生文件夹下有一个工程文件sjt4.vbp。该程序的功能是计算M!+(M+1)!+(M+2)!+…+N!之和。窗体上有名称分别为Textl、Text2的两个文本框,用于接收输入的M和N(要求M<N)。单击名称为Commandl、标题为“计算”的命令按钮,
admin
2020-04-08
49
问题
在考生文件夹下有一个工程文件sjt4.vbp。该程序的功能是计算M!+(M+1)!+(M+2)!+…+N!之和。窗体上有名称分别为Textl、Text2的两个文本框,用于接收输入的M和N(要求M<N)。单击名称为Commandl、标题为“计算”的命令按钮,计算M!+(M+1)!+(M+2)!+…+N!的值,并将计算结果显示在标签lblResuh中。
在给出的窗体文件中已经有了全部控件,但程序不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤l:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符,将问号改为正确的内容。 参考答案(阴影部分是需考生填入的内容) Private Sub Commandl_Click() Dim m As Integer Dim n As Integer Dim S As Long Dim i As Integer m=Val(Textl.Text) ′将文本框中的字符转换成数值型 n=Val(Text2.Text) S=0 For i=
m
To n—m t=
f(i)
′调用函数得到N的阶乘 s=s+
t
Next iblResult.Caption:S End Sub Private Function f(ByRef x As Inte- ger)As Long′ByRef为传址传递 Dim t As Long t=1 For i=1 To x′实现对数值进行阶乘运算 t=
t*i
Next f=
t
′返回计算结果 End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】程序语句较少,表达式比较复杂,要充分理解过程函数的算法及主函数的循环语句的运用。
解析
Function f()过程函数用于实现对数值阶乘的运算,Val()函数实现将文本框中的字符转换成数值型,通过循环调用过程函数实现对表达式结果的累加。
转载请注明原文地址:https://kaotiyun.com/show/VNTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的执行结果为()。A=“5”:B=“6”A=Val(A)+Val(B)B=Val(“56”)IfA<>BThenPrintA-BElsePrintB-A
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click() m=-3.6 IfSgn(m)Then n=Int(m) Else n=Abs(m) EndIf
假定在某个事件过程中需要计算:y=3!+5!的值,下面最好的设计是
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=10y=20Callfun1(x,y)Printx;yEnd
能够用于标识对象名称的属性是()。
下列控件中,没有Caption属性的是( )。
设窗体上有2个框架,每个框架中有若干个单选按钮,下面叙述中正确的是()。
关于MDI窗体下列说法正确的是()。
以下关于VB对象属性的叙述中,错误的是
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimsAsDoubles=0:i=1DoWhilei<6s
随机试题
含砷的药材有
案情:某年1月,张某不慎遗失其背包,内有其名贵钻石项链一条。李某拾得后,按照背包内的名片所示积极寻找失主,与张某取得了联系,将钻石项链归还给了张某。同年5月,张某与赵某结婚。张某、赵某合计开设一家书吧,书吧办理工商登记注明的个体工商户开办人为张某。
下列表述中,不正确的有()。
发明专利权的期限为20年,实用新型专利权和外观设计专利权的期限为10年,均自公告之日起计算。()
Inthefollowingtext,somesentenceshavebeenremoved.ForQuestions41-45,choosethemostsuitableonefromthelist(A、B、C、
Microblogging(微博)appearedin2006andhasmovedfromitsearly,perceivedlimitationstogrowinpopularityandbecomeapowerfu
Ifthepopulationof’theearthgoesonincreasingatitspresentrate,whenwillweuseupalltheoilthatdrivesourcars?A
A、$10.B、$84.C、$94.D、$178.B对话最后,女士询问价格,男士回答这件连衣裙上周的价格为94美元,但是现在搞促销,只需要84美元。
A、Adrivingtest.B、Atrafficaccident.C、Apolicemovie.D、Thebestwaytomakesignals.B主题推断题从对话的关键词themess、drivingcareles
Howdowegetmorepeopletoincreasetheirconsumptionofiron-richfoods?Manynutritionists【C1】______theincreaseofanumber
最新回复
(
0
)