首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹中有一个工程文件sjt3.vbp。运行程序时,先向文本框Text1中输入一个不超过10的正整数,然后选择“N的阶乘”或“(N+2)的阶乘”单选钮,即可进行计算,计算结果在文本框Text2中显示,如图所示。在给出的窗体文件中已经添加了全部控
(1)在考生文件夹中有一个工程文件sjt3.vbp。运行程序时,先向文本框Text1中输入一个不超过10的正整数,然后选择“N的阶乘”或“(N+2)的阶乘”单选钮,即可进行计算,计算结果在文本框Text2中显示,如图所示。在给出的窗体文件中已经添加了全部控
admin
2017-12-14
51
问题
(1)在考生文件夹中有一个工程文件sjt3.vbp。运行程序时,先向文本框Text1中输入一个不超过10的正整数,然后选择“N的阶乘”或“(N+2)的阶乘”单选钮,即可进行计算,计算结果在文本框Text2中显示,如图所示。在给出的窗体文件中已经添加了全部控件,但程序不完整。要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
(2)在考生文件夹中有一个工程文件sjt4.vbp。该程序的功能是将文件in4.txt中的文本读出并在文本框Textl中显示。输入一个英文字母到文本框Text2中,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果在标签Label3中显示。
给出的窗体文件中已经有了全部控件,如图所示。程序不完整,要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
选项
答案
(1)在单击单选按钮数组事件过程中,首先向文本框Text1中输入一个不超过10的正整数,通过‘Val函数实现字符向数值的转换,然后选择“N的阶乘”或“(N+2)的阶乘”单选按钮,通过Select Case语句和单选按钮数组的Index属性,确定所调用函数的参数,从而调用Function n()过程函数进行计算,将计算结果显示在文本框Text2中。 【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Optionl—Click(Index As Integer) Dim n As Integer n=Val(Text1.Text) Select Case? Case 0 Text2.Text=n(?) Case 1 Text2.Text=n(?) End Select End Sub Public Function n(n As Integer)As Long Dim x As Long x=1 For i=1 To? x=x*i Next ? =x End Function 程序结束 参考答案 第1个?处填入:Index 第2个?处填入:n 第3个?处填入:n+2 第4个?处填入:n 第5个?处填入:n 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)通过文件操作和“&”连接符将文件in4..txt中的文本读出并显示在文本框Text1中,在Commandl Click事件过程中,在文本框Text2中输入一个英文字母,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果显示在标签Labe13中。 【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Form—Load() Open App.Path&“\in4.txt”For Input As#1 Line Input#1,s Textl.Text=? Close#1 End Sub Private Sub Commandl—Click() Dim n As Integer s=Text1.Text s1=RTrim(Text2.Text) DO p=InStr(?) If p<>0 Then n=n+1 s=Mid(s,p+1) ’Loop While p?0 ’LabeB.Caption=? End Sub 程序结束 参考答案 第1个?处填入:s 第2个?处填入:s,s1 第3个?处填入:<> 第4个?处填入:n 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/fgGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮(其名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()Dima(5,5)AsIntegerDimiAsInteger,jAsI
用Write和Print语句向文件中写入多个数据的差别在于______。
在面向对象程序设计中,从外面看只能看到对象有外部特征,而不知道也无须知道数据的具体结构以及实现操作的算法,这称为对象的______。
在窗体上画一个名称为Text1的文本框.然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图16-6所示。以下能实现上述操作的程序段是______。
VisualBasic一共有设计、运行和中断三种模式,要使用调试工具应该()。
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAng KAsInteger
在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。
结构化程序设计的3种基本结构是()。
以下说法中正确的是()。
下列关于菜单的说法中,错误的是
随机试题
下图为某班学生期中考试成绩,请根据所学知识,回答下列问题。(1)若要计算三门科目的最高分,可以在D14单元格中输入公式________,然后利用填充柄计算其他科目的最高分。(要求使用函数)
A.BOIDB.DWIC.PWID.MRAE.SWI用于组织毛细血管水平的血流灌注情况较好的检查方法是
鳃裂囊肿发生于腮腺者主要来源于
诉讼时效期间届满,当事人丧失()。
《建筑设计防火规范》不适用于()。
某公路隧道全长5200m。该隧道其围岩主要为弱风化硬质页岩,属Ⅳ~V级同岩,稳定性较差。根据该隧道的地质条件,承包人拟采用台阶分部法施工。由于地下水发育,特别是断层地带岩石破碎,裂隙发育,涌水严重,隧道开挖过程中出现了重大质量事故。施工单位立即采取现场保护
关于债券的特征,下列说法中正确的是( )。
下列人物中,在15世纪航行到达印度的有()。①哥伦布②郑和③迪亚士④达.伽马⑤麦哲伦
【B1】【B12】
TheSupremeCourtwillhearargumentstodayabouttheuseofpublicmoneyfortheprivateschoolingofchildrenwithspecialnee
最新回复
(
0
)