首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sj3.vbp。相应的窗体文件名为sj3.frm。请装人该文件.在窗体上画一个列表框和一个文本框,名称分别为Listl和Textl。 编写适当的事件过程。程序运行后,如果在文本框中输入要添加的项并双击,则将该项添加
(1)在考生文件夹下有一个工程文件sj3.vbp。相应的窗体文件名为sj3.frm。请装人该文件.在窗体上画一个列表框和一个文本框,名称分别为Listl和Textl。 编写适当的事件过程。程序运行后,如果在文本框中输入要添加的项并双击,则将该项添加
admin
2009-03-26
69
问题
(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全国计算机二级
相关试题推荐
若a是float型变量,且a=6,则表达式a/2+(int)(a+1)%2的值为【】。
选择运算的结果关系同原关系具有【】的结构框架,投影运算的结果关系同原关系通常具有【】的结构框架。
查找随机文件的记录时,应使用的方法是()。
下列安全控制命令中,属于现实证书缓存区和密钥表项命令的是()。
如果在Applet中要访问一个HTML文件,可以请示浏览器实现相应HTML文本的显示。通过AppletContext的【】方法,Applet可以通知浏览器在哪个窗口中显示哪个URL中的文件。
在AWT组件中,【】类可以实现带标题和边界的窗口,通常用于接收用户附加信息或发布通知,它是Window类的子类。
下列构造函数中创建了一个为20行,30列的文本区的是()。
在关系运算中, 【】 运算是对两个具有公共属性的关系所进行的运算。
若x、a、b和c均是int型变量,则执行表达式x=(a=1,b=2)后的结果是()。
int类型的取值范围为
随机试题
慢性消化性溃疡不具备的病理变化是
关于传入侧支抑制
低渗性脱水的常见病因是高钾血症的常见病因是
按照《治安管理处罚法》的规定,询问不满多少周岁的违反治安管理的行为人,应当通知其父母或者其他监护人到场?()
某大厦建设工程项目的业主与某监理公司和某建筑工程公司分别签订了建设工程施工阶段委托监理合同和建设工程施工合同。为了能及时掌握准确、完整的信息,以便依靠有效的信息对该建设工程的质量、进度、投资实施最佳控制,项目总监理工程师召集了有关监理人员专门讨论了如何加强
假定有A、B两个投资方案,它们的投资额相同,现金流量总和也相同,但A方案的现金流量逐年递增,B方案的现金流量逐年递减。如果考虑资金时间价值,在两方案均可行的情况下,下列表述正确的是()。
下列项目中,应计入商品流通企业存货入账价值的有()。
今年祖父的年龄是小军年龄的6倍,几年后祖父的年龄是小军年龄的5倍,又过几年以后,祖父的年龄是小军年龄的4倍。由此可知,祖父今年60岁。()
WhilepopularintheU.S.,theAprilFool’sDaytraditionisevenmoreprevalentinEuropeancountries,suchasFranceandGre
Home,Sweet(andSour)HomeOnAugust15,1945,thedaythatwarended,Australiawasjubilant.Amonthlateritwasmorewar
最新回复
(
0
)