首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图3—100所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图3—100所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
admin
2017-10-27
66
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图3—100所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,完成上述功能。
注意:不能修改已经给出的程序部分和已有的控件;在结束程序运行之前,必须选中一个单选按钮和至少一个复选框,并单击“确定”按钮;必须通过单击窗体右上角的关闭按钮结束程序,否则无成绩。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp。窗体中已经给出了所有控件。程序运行时,单击“读入文件”按钮,将显示一个“打开”对话框,可以在该对话框中选择考生文件夹下的文本文件in4.txt,并把该文件的内容显示到Text1文本框中。要求:请去掉程序中的注释符,并把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
选项
答案
(1)【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt3.vbp。 步骤2:打开代码编辑窗口,编写“确定”按钮的Click事件过程,代码如下。参考代码: Private Sub Command1_Click() If Op1.Value Then Text1.FontName=Op1.Caption ElseIf Op2.Value Then Text1.FontName=Op2.Caption End If If Ch1.Value=1 Then Text 1.FontUnderline=True Else Text1.FontUnderline=False End If If Ch2.Value=1 Then Text1.FontItalic=True Else Text1.FontItalic=False End If End Sub 步骤3:按
键运行程序,选中一个单选按钮和至少一个复选框,并单击“确定”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”将问号“?”改为正确的内容。参考代码: Private Sub Command1 _Click() Dim n As Long CD1.FileName=" " CD1.Filter="所有文件|*.*|文本文件 |*.txt|Word文档|*.doc" CD1.FiiterIndex=2 CD1.Action=1 If CD1.FileName<>" "Then Open CD1.FileName For Input As#1 _=LOF(1) Text1=Inputs(n,#1) Close #1 End If End Sub 步骤2:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/BVGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序功能是,产生10个0~100的随机数,输出其中的最大值。请将程序补充完整。PrivateSubForm_Click()Diman(10)AsIntegerDimmaxAsInteger Randomi
如果存在如下过程:PrivateFunctionFun(a()AsInteger)DimFirstAsInteger,LastAsInteger,iAsInteger First=LBound(a) La
为了使标签能自动调整大小以显示全部文本内容,应把标签的__________________属性设置为True1。
下列程序是用来计算1+2+3+…+10的程序段,请补充完整该程序。Dimi,s,kAsIntegers=0:k=0For______To-1k=k+1s=s+kNextiPr
第一范式是满足关系模式所要遵循的最基本的条件的范式,即关系中的每个属性必须是【】的简单项。
用Close语句可以关闭一个已经用完不再使用的文件,当该语句不带任何参数时,它的功能是______。
假定一个文本框的Name属性为Text1,为了在该文本框中显示“Hello!”,所使用的语句为【】。
表达式Str(Len("12345"))+Str(88.8)的值为______。
希尔排序法属于哪一种类型的排序法______。
设有下面的循环。i=1Doi=i+3PrintiLoopUntili>______程序运行后要执行3次循环体,则条件中i的最小值为
随机试题
甲因乙拒绝履行生效判决所确定的向其支付30万元货款的义务,向人民法院申请强制执行。在执行程序中,人民法院冻结了乙的银行存款,并查封了其库存货物。法院采取了上述执行措施后,丙持其他人民法院制作的26万元的调解书,丁持其他人民法院制作的还未产生执行效力的20万
某风沙治理工程,原来是一片典型的城乡结合部地区,需要进行大规模的绿化隔离建设,原先的居民迁入了楼房,实现3.08km2的绿化,绿化隔离地区总面积为240km2。道路、河流两侧将建设各200m宽的绿化带,其中内侧的20~50m将成为永久绿化带。在其外侧则发展
施工招标项目工期超过()个月的,招标文件中可以规定工程造价指数体系、价格调整因素和调整方法。
运动员体育津贴属于()。
使用FTP服务下载文件时,不需要知道的是()。
2008年,美联储前主席、曾被誉为“有史以来最伟大银行家”的艾伦.格林斯潘在向美国国会作证时称,市场没有如他毕生所期望的那样运行,这令他感到“震惊”。他“错误地以为许多组织,特别是银行等机构都是不折不扣的利己主义者,它们最能保护自己股东的利益”。下
某资本家投资100万元,每次投资所得的利润是15万元,假定其预付资本的有机构成是4:1,那么该资本家每次投资所实现的剩余价值率为:
HumanmaleslivingwiththeirmomsmaynotexpecttohavemuchluckhookingupthisValentine’sDay.【C1】______amongthenorthern
WhattimedidthewomanhavetoseeBob’steacher?
Intheearly1450’sculturalchangeinEuropefueledagrowingneedfortherapidandcheapproductionofwhitendocuments.Befo
最新回复
(
0
)