首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:通过键盘向文本框中输人数字,如果输入的是非数字字符,则提示输入错误,且文本框中不显示输人的字符。单击名称为Command1、标题为“添加”的命令按钮,则将文本框中的数字添加到名称为Combol
(1)考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:通过键盘向文本框中输人数字,如果输入的是非数字字符,则提示输入错误,且文本框中不显示输人的字符。单击名称为Command1、标题为“添加”的命令按钮,则将文本框中的数字添加到名称为Combol
admin
2015-06-30
21
问题
(1)考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:通过键盘向文本框中输人数字,如果输入的是非数字字符,则提示输入错误,且文本框中不显示输人的字符。单击名称为Command1、标题为“添加”的命令按钮,则将文本框中的数字添加到名称为Combol的组合框中。在给出的窗体文件中已经添加了全部控件,但程序不完整。要求去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序中的其他部分和其他控件的属性。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp。该程序的功能是计算M!+(M+1)!+(M+2)!+…+N!之和。窗体上有名称分别为Text1、Text2的两个文本框,用于接收输入的M和N(要求M<N)。单击名称为Command1、标题为“计算”的命令按钮,计算M!+(M+1)!+(M+2)!+…+N!的值,并将计算结果显示在标签lblResult中。
在给出的窗体文件中已经有了全部控件,但程序不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
(1)【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Command1_Click() ’Combo1.? Text1.Text = "" End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) ’If KeyAscii > 57 Or KeyAscii < ? Then MsgBox "请输入数字!" ’ KeyAscii = ? End If End Sub 程序结束 参考答案 第1个?处填入:AddItem Text1.Text 第2个?处填入:48 第3个?处填入:0 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Command1_Click() Dim m As Integer Dim n As Integer Dim s As Long Dim i As Integer m = Val(Text1.Text) n = Val(Text2.Text) s = 0 ’For i =? To n ’t =? ’s = s + ? Next lblResult.Caption = s End Sub Private Function f(ByRef x As Integer) As Long Dim t As Long t = 1 For i = 1 To x ’t = ? Next ’f =? End Function 程序结束 参考答案 第1个?处填入:m 第2个?处填入:f(i) 第3个?处填入:t 第4个?处填入:t * i 第5个?处填入:t 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/c8Qp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上有一名为list1的列表框和名为Command1的命令按钮,要求程序运行后;如果单击命令按钮,则把列表框中所有的列表项目写到顺序文件list.txt中。下列能完成该操作的程序是______。
在C盘当前文件夹下建立一个名为StuData.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。PrivateSubFormClick()Open"C
下面叙述中不正确的是______。
如果在C盘当前文件夹下已存在名为StuDatA.dar的顺序文件,那么执行语句Open“C:StuDatA.dar”ForAppendAs#1之后将______。
有如下函数:PrivateFunctionfirstfunc(xAsInteger,yAsInteger)AsIntegerDimnAsIntegerDoWhilen<=4
对二叉树从1开始进行连续编号,要求每个结点的编号大于其左右孩子的编号,同一个结点的左右孩子中,其左孩子的编号小于其右孩子的编号,则可采用______遍历实现编号。
下列叙述中错误的是
下列叙述中正确的是
下列程序段在窗体上输出______,在立即窗口中输出______。S1="software"S2="hardware"S3="computer"PrintRight(S1,3)Picturel.PrintMid(
两个或两个以上模块之间联系的紧密程度称为()。
随机试题
试述司法行政机关与律师协会的关系。
食管癌手术患者的护理过程中,不正确的是
一矩形截面梁,当横截面的高度增加1倍,宽度减小一半时,从正应力强度条件考虑,该梁的承载能力的变化将()。
下列波函数不合理的是()。
施工现场临时的木工间,油漆间,木机具间等,每25m2配备灭火器至少()只。
会计核算软件在某月进行月末结账以后,系统应能自动控制()。
对于已经分摊商誉的资产组或资产组组合,无论是否存在资产组或资产组组合可能发生减值的迹象,企业每年都应当通过比较包含商誉的资产组或资产组组合的账面价值与可收回金额进行减值测试。()
Dr.Smith,togetherwithhiswifeanddaughters,_____visitBeijingthissummer.
TASKONE--THELISTENEROFTHETALK•Forquestions13-17,matchtheextractswiththepeople,listedA-H.•Foreachextract,deci
A、Secretary-Pass.B、Client-Lawyer.C、Patient-NurseD、Student-Teacher.D
最新回复
(
0
)