首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sj3.vbp。相应的窗体文件名为sj3.frm。请装人该文件.在窗体上画一个列表框和一个文本框,名称分别为Listl和Textl。 编写适当的事件过程。程序运行后,如果在文本框中输入要添加的项并双击,则将该项添加
(1)在考生文件夹下有一个工程文件sj3.vbp。相应的窗体文件名为sj3.frm。请装人该文件.在窗体上画一个列表框和一个文本框,名称分别为Listl和Textl。 编写适当的事件过程。程序运行后,如果在文本框中输入要添加的项并双击,则将该项添加
admin
2009-03-26
59
问题
(1)在考生文件夹下有一个工程文件sj3.vbp。相应的窗体文件名为sj3.frm。请装人该文件.在窗体上画一个列表框和一个文本框,名称分别为Listl和Textl。
编写适当的事件过程。程序运行后,如果在文本框中输入要添加的项并双击,则将该项添加到列表框中(内容任意,不少于3个),如图17—3所示;如果双击Listl的某一项则将其从列表框中删除,如图17—4所示。提供的窗体文件可以实现上述功能,但这个程序不完整,请把它补充完整。
注意:去掉程序中的注释符“’”,把程序中的“?”改为适当的内容,使其正确运行,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sj4.vbp,窗体如图所示。其功能是单击“输入数据”按钮,则可输入一个整数n;单击“计算”按钮.则计算1!+2 !+3 !…+n!的值,并将计算结果显示在文本框中;单击“存盘”按钮,则把文本框中的结果保存到考生文件夹下的out4.dat文件中。程序运行时的窗体界面如图17—5所示。
文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容,并编写”计算”按钮的Click事件过程。
注意:不得修改已经存在的内容和控件属性,在结束程序运行之前,必须用“存盘”按钮存储计算结果,否则无成绩。最后将修改后的文件按原文件名存盘。
选项
答案
(1)根据题意,将一个ListBox控件和一个Text控件添加到窗体上,ListBox的名称为Listl,Text的名称为Textl,Text属性为空。双击Listl进入代码窗口,编写如下代码: Private Sub Listl_DblClick() Listl.Removehem(Listl.
Listlndex
) ’双击删除选中项 End Sub Private Sub Textl_DblClick() ’双击Text调用的函数 If Textl.Text◇""Then Listl.
Addhem
Textl.Text’当Textl中有内容则添加到Listl中 End If End Sub 单击[*]按钮运行程序,并按要求保存。 (2)本题主要考查Val()函数、InputBox()函数、MsgBox()函数、命令按钮的Enabled属性以及文件操作。根据题意,编写如下代码: Dim n As Integer Private Sub Commandl_Click() n=Val(InputBox("请输入整数(8—12)","输入")) If n>12 Or n<8 Then MsgBox("数据错误,请重新输入") Command2.Enabled=False Command3.Enabled=False Else Command2.Enabled=True Command3.Enabled=True End If End Sub Private Sub Command2_Click() Dim S As Long,k As Integer 考生应编写的程序 s=0 For k=1 To n s=s+f(k) Next Textl=S End Sub Function f(n As Integer)As Long s=
1
For k=2 To n s=s*k Next f=
s
End Function Private Sub Command3_Click() Open App.Path&"\out4.dat"For Output As#1 Print#1,n,Textl Close#1 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/7V1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
关系数据库管理系统能实现的专门关系运算包括()。
需求分析最终结果是产生()。
查找随机文件的记录时,应使用的方法是()。
如果一个JavaApplet源程序文件只定义有一个类,该类的类名为MyFirstApplet,则存储该源程序的文件名必须为【】。
在软件工程中,白箱测试法可用于测试程序的内部结构。此方法将程序看做是()
当数据的物理结构(存储结构、存取方式等)改变时,不影响数据库的逻辑结构,从而不致引起应用程序的变化,这是指数据的【】。
如果对一个关系实施了一种关系运算后得到了一个新的关系,而且新的关系中属性个数少于原来关系中属性个数,这说明所实施的运算关系是()
下面关于注释的添加方法,正确的是()。
Java语言对内存采用【】机制,有效地防止了因程序员误操作而引起的错误,并更好地利用了系统资源。
int类型的取值范围为()。
随机试题
为什么刑讯逼供在刑事诉讼中屡禁不止?结合有关规定分析原因,并给予评论。(北大2005年研)
Students’PressureStudents’【C1】______(press)sometimescomesfromtheirparents.Mostparentsarewellmeaning,butsomeof
世界多极化的发展趋势在进入21世纪之后日趋明显,这主要是因为()。
下述属于灭菌法的是
A.腹膜炎B.腹膜纤维化C.腹透管移位D.腹透管周围网膜包绕E.腹透管堵塞某患者尿毒症腹膜透析近3年,过程顺利,1天前发现腹透液完全不能流出,最大可能原因是
( )分别适用于车辆、船舶等运输设备和机器、设备等计提折旧。
某施工企业2014年利润总额为4030万元,该企业所得税费用为530万元,净利润是()。
根据下列资料,回答下列问题。2009年1~8月,电子信息产业500万元以上投资项目完成固定资产投资2371.4亿元,同比增长15.8%,增速低于去年同期12.3个百分点,低于全国制造业水平11.5个百分点。从行业看,家用视听行业投资48.8亿元
结构化程序设计主要强调的是(46)。
Whiletheworld’sflufightershaveconcentratedoncounteringtheH1N1swineflu,birdfluH5N1hasquietlycontinuedtotakei
最新回复
(
0
)