首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Tex
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Tex
admin
2019-03-14
24
问题
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Text1,如图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在Text1文本框中。近似公式女口下:e=1+1/1!+1/2!+1/3!+…+1/n!+…请将程序代码中的注释符去掉,把?改为正确内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后,程序按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp。其窗体中有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.001301 e=e+x i=i+1 x=1/je(i) Loop Text1.Text=e End Sub Function jc(n As Integer)As Long Dim i As Integer Dim t As Long t=1 For i=1 To n t=t*i Next jc=t 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:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)在窗体中添加Text控件,首先将Text控件中的内容设置为空,然后进入“计算”按钮的单击事件过程,Do While循环结构中调用求阶乘函数jc,依次求变量i的阶乘结果,将最后的计算结果,显示在Text控件上。
(2)利用Do While循环遍历Text1中的字符串,并使用Mid(Text1,i,1)取出Text1中相应位置的字符,判断该字符是否与Text2中的字符相等,如果相等则将变量num加1,循环结束后根据num的值,判断程序的查找结果。
转载请注明原文地址:https://kaotiyun.com/show/hOFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Command1的命令按钮,一个名称为List1的列表框。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1DoWh
能够被窗体或控件所识别的操作称为
(1)在名称为。Form1的窗体上添加一个名称为Frame1、标题为“框架”的框架,在框架内添加两个名称分别为Option1、Option2的单选按钮,其标题分别为“第一项”、“第二项”。要求通过设置控件的属性将“第二项”初始值设置为被选中,框架为不可用。
要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是( )。①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来
在窗体上有4个文本框,名称分别为Text1、Text2、Text3、Text4,和1个名称为Command1的命令按钮,然后编写如下程序代码:PrivateSubCommand1_Click()Dimyear%,month%,days
下列关于标准模块的叙述中,错误的是
下列关于InputBox函数的叙述中,错误的是
有两个关系R和S如下:则由关系R得到关系S的操作是
按照“后进先出”原则组织数据的数据结构是
下列数据结构中,属于非线性结构的是
随机试题
Fromthehealthpointofviewwearelivinginamarvelousage.Weareimmunizedfrombirthagainstmanyofthemostdangerousd
青霉素引起的过敏性休克首选治疗药物是
具有高等学校医学专科学历,参加执业助理医师资格考试者,应在医疗、预防、保健机构中试用期满
平屋面排水,每根水落管的允许屋面最大汇水面积的表述,哪个是正确的?[2000年第085题][2003年第082题]
重锤夯实地基的特点有()。
狭义的劳动争议,是指员工与用人单位之间关于劳动关系、()的争议,在多数情况下,劳动争议是针对狭义而言的。
我国正处于改革的攻坚期与深水期,改革要紧紧围绕群众,请谈谈你对党的群众路线教育实践活动的看法。
汽车上有男乘客45人,若女乘客人数减少10%,恰好与男乘客人数的3/5相等,汽车上女乘客有()人。
我国《宪法》规定,对任何公民的逮捕必须经过哪个国家机关的决定或批准?()
说明:假定你是李明,请根据以下内容以第一人称发一封电子邮件。内容:1.发件人:李明2.收件人:Linda3.发件人电子邮箱地址:liming2013@163.com4.收件人邮箱地址:linda2013@163.com5.事由:李明是某网上书店
最新回复
(
0
)