首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Tex
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Tex
admin
2017-09-20
28
问题
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Textl文本框中。近似公式如下:e=1+1/1!+1/2!+1/3!+…+1/n!+…请将程序代码中的注释符去掉,把?改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后,程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbpo其窗体中有1个名称为Command1,标题为“查找”的命令按钮;3个初始内容为空的文本框Text1、Text2和Text3,其中Text1允许显示多行内容,且有垂直滚动条,如图所示。程序功能为:首先在Text1中输入原始字符串,在Text2中输入要查找的单个字符,然后单击“查找”按钮,则在Text3中显示查找的结果。图示为某一次的运行效果。
请将“查找”命令按钮Click事件过程中的注释符去掉,把?改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后,程序按原文件名存盘。
选项
答案
(1) 【操作步骤】 步骤1:打开本题项目工程,并在窗体中添加文本控件Text1, 并按照表4.6设置文本控件Text1的属性,结果如图4.5所示。 [*] 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 Private Sub Command1_Click() Dim e As Single,x As Single Dim i As Integer e=0:i=0 x=1 Do While x>0.00001 e=e+x i=i+1 x1/jc(i) Loop Text1.Text=e End Sub Function jc(n As Integer)As Long Dim i As Integer Dim t As Long l=1 For i=1 To n t=t*i Next jc=1 End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2) 【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 Private Sub Command1_Click() Dim X As String Dim num As Integer,i As Integer i=1 num=0 Do While i< =Len(Text1) If Mid(Text1,i,1)=Text2 Then num=num+1 End If i=i+1 Loop If num=0 Then x="没有找到!". Else x=”找到了”&num&”个”&Text2 End If Text3=x End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/qdy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若要求输入密码时文本框中只显示“*”号,则应当在文本框的属性窗口中设置______属性。
在鼠标事件过程MouseDown和MouseUp中,参数Button的值为1、2、4时,分别代表按下鼠标的______、______和______按钮。
设窗体上有一个名为Txtl的文本框和一个名为Commandl的命令按钮,并有以下事件过程:PrivateSubCommandl一Click()x!==Val(Textl.Text)SelectCasexCas
下列程序段的执行结果为_______。X=5Y=-20IfNotX>0ThenX=Y-3ElseY=X+3PrintX-Y;Y-X
下列程序段的结果为______。A="ABBACDDCBA"ForI=6To2Step-2X=Mid(A,I,I)Y=Left(A,I)Z=Right(A,I)Z=X&Y&ZNextIPrintZ
当把框架的什么属性设置为False时,其标题会变灰,框架中所有的对象均被屏蔽
在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timed。要求每一秒在文本框中显示一次当前的时间。程序为:PrivateSubTimerl_______TextTime.text=TimeEndSu
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1Click()n=5f=1s=0Fori=1Tonf
随机试题
溶血性链球菌感染所形成的脓液为
Internet是由什么发展而来的?
实施建筑工程监理前,建设单位应当将_________书面通知被监理的建筑施工企业。()
()是指为建筑消火栓给水系统、自动喷水灭火系统等水灭火系统提供可靠的消防用水的供水系统。
购入材料时支付的增值税和进口关税均应计入采购成本。()
张红去商场购买自行车,见商场摆放有20辆同一型号的自行车。张红从中挑选了一辆。张红付款时突接电话,被告知有急事,需马上离开。于是,张红与营业员商定:先付款,第二天来取自行车。当夜,安保人员疏忽大意未锁大门致商场发生盗窃案,5辆自行车被盗(其中包括张红挑选并
某涂料生产公司甲为增值税一般纳税人,2020年7月发生如下业务:(1)5日以直接收款方式销售涂料取得不含税销售额350万元;以预收货款方式销售涂料取得不含税销售额200万元,本月已发出销售涂料的80%。(2)12日赠送给某医院20桶涂料
货币发挥支付手段的职能表现在()。
在仪表礼仪中,男导游如果着西装,必须注意的问题有()。
PrisonStudiesA)Manywhotodayhearmesomewhereinperson,orontelevision,orthosewhoreadsomethingI’vesaid,willthink
最新回复
(
0
)