首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图1-140所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图1-140所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
admin
2010-09-02
41
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图1-140所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,完成上述功能。
注意:不能修改已经给出的程序部分和已有的控件;在结束程序运行之前,必须选中一个单选按钮和至少一个复选框,并单击“确定”按钮;必须通过单击窗体右上角的关闭按钮结束程序,否则无成绩。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp。窗体中已经给出了所有控件。程序运行时,单击“读入文件”按钮,将显示一个“打开”对话框,可以在该对话框中选择考生文件夹下的文本文件in4.txt,并把该文件的内容显示到Text1文本框中。
要求:请去掉程序中的注释符,并把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
选项
答案
第l小题 【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt3.vbp。 步骤2:打开代码编辑窗口,编写“确定”按钮的Click事件过程,代码如下。 参考代码: PriVate Sub Commandl_Click() If Opl.Value Then Textl.FontName=opl.Caption Else If Op2.Va上ue Then Textl.FontName=Op2.Caption End If If Chl.Value=l Then Textl.FontUnderline=True Else Textl.FontUnderline=False End If If Ch2.Value=1 Then Textl.Font工talic=True Else Textl.FontItalic=False End If End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按
键运行程序,选中一个单选按钮和至少一个复选框,并单击“确定”按钮,最后单击窗体右上角的关闭按钮结柬程序。 第2小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Private Sub Command1_Click() Dim n As Long CDI.FileName="" CDI.Filter="所有文件|*.*|文本文件 |*.txt|Word文档|*.doc" CD1.FilterIndex=2 CDI.Action=1 If CDI.FileName<>""Then Open CDl.FileName For Input As#1 n=LOF(1) Textl=Input$(n,#1) Close #1 End If End Sub 步骤2:按要求将文件保存至考生文件夹中。
解析
第l小题
本题其实就是编写“确定”按钮的单击事件过程。设计思路:由于单选按钮数组选择的唯一性,可用一个If…Men…Else语句对可能出现的两种情况(Opl或op2被选中)分别进行处理,为Textl的FontName属性设置不同值;对于两个复选框可用两个If…Then…Else语句依次对其选中情况进行处理,若选中则将对应的FontUnderline属性值或FontItalic属性值设置为True,否则设置为False。
第2小题
通用对话框(CommonDialog)是提供诸如打开文件、保存文件、设置打印选项、选择颜色和字体、显示帮助等操作的一组标准对话框,该控件运行时不可见。Action属性用于设置被打开对话框的类型;当通用对话框显示为“打开”或“另存为”类型时,其FileName属性用于返回或设置所选的文件的路径和文件名,Filter(过滤器)属性在对话框显示时提供一个可供选择过滤器列表,从而指定在对话框的文件列表中显示文件的类型,例如,过滤器为*.txt,表示显示所有的文本文件,它的语法为;对象名.Filter=”描述l文件扩展名”。使用管道符(|)将描述与过滤器隔开,同样使用管道符将多个过滤器相互分隔。Filterlndex属性返回或设置“打开”或“另存为”对话框中一个缺省的过滤器,其中第一个过滤器的索引号是1。
在VB6中开始使用新方法来打开不同对话框,同时也保留了对Action属性的支持。表2-79列出了不同Action属性值代表的对话框类型及其在VB6中的对应方法。
[*]
根据题目原程序,首先设置通用对话框CDl的Filter属性和Filterlndex属性,然后调用CDI的ShowOpen方法,接下来通过Input方式打开选中的文件,将文件读入后放到文本框Textl中,最后使用Close语句关闭文件。
转载请注明原文地址:https://kaotiyun.com/show/0Ump777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
char变量的取值范围是
在模块化程序设计中,按功能划分模块的原则是
Java中访问限定符有【】,protected,private和default等。
下列关系运算中,能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是
下列组件不能添加进Frame主窗口的是()。
下列命令中用于激活系统守候进程以便能够在Java虚拟机上注册和激活对象的是()。
Java中方法的参数传递是【】调用,方法不能改变参数值,但可以改变变量值,两个对象之间的参数字段不能相互交换。
耦合和内聚是评价模块独立性的两个主要标准,其中______反映了模块内各成分之间的联系。
通常使用哪一个方法来注册事件监听器______。
随机试题
某企业期末“工程物资”科目的余额为100万元,“发出商品”科目的余额为80万元,“原材料”科目的余额为100万元,“材料成本差异”科目的贷方余额为10万元,“存货跌价准备”科目贷方余额为5万元。假定不考虑其他因素,该企业资产负债表中“存货”项目的金额为(
A.泛素B.热激(休克)蛋白C.逆转录酶D.蛋白激酶参与合成多肽链折叠的蛋白质是
在术前准备中,哪一项是错误的:
A.链球菌B.葡萄球菌C.淋病奈瑟菌D.肺炎球菌E.脑膜炎奈瑟菌引发猩红热的病原体是
A、磺胺嘧啶(SD)+TMPB、磺胺甲噁唑(SMZ)+TMPC、磺胺嘧啶银D、磺胺醋酰钠(SA)E、磺胺嘧啶(SD)+链霉素预防烧伤感染宜选( )。
某市发生一起人户杀人案,因案发现场已被严重破坏,公安机关一时难以发现案件线索。正在一筹莫展之际,侦查员王某忽然发现案发现场所在楼门前有一个约5岁的小男孩于某一直在玩滚珠珠游戏。侦查员王某对于某进行询问后,得知案发当日下午曾有两名背着包的男子与该楼一男性住户
王某2008年工资和奖金收入应纳个人所得税总和为( )元。王某2008年住房收入应纳个人所得税为( )万元。
资料(一)俊宏益德集团(以下简称俊宏集团)属于建筑防水材料行业,是一家集研发、生产、销售、技术咨询和施工服务为一体的专业化建筑防水系统集团。该企业防水卷材和防水涂料产能分别为1500万平方米/年和1.5万吨/年,在2005~2007年连续三年位列
分析目前我国非公有制经济的性质及作用。
设有定义:struct{charmark[12];intnum1;doublenum2;}t1,t2;,若变量均已正确赋初值,则下列语句中错误的是()。
最新回复
(
0
)