首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图3—100所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,并单击“确定”按钮,则对文本框中的文字做相应的设置,如图3—100所示。窗体上的控件已经画出,但没有给出主要程序内容,请编写适当的事件过程,
admin
2017-10-27
30
问题
(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://jikaoti.com/ti/XLy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序代码用来实现如下功能:单击命令按钮弹出对话框,在其中输入正数后单击确定,弹出一个提示信息显示刚才输入的正数,否则提示"error"。请填空。PrivateSubCommand1_Click()DimaAsInteger,bAsSt
如果存在如下过程:PrivateFunctionFun(a()AsInteger)DimFirstAsInteger,LastAsInteger,iAsInteger First=LBound(a) La
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请选择正确的程序段是(),将程序补充完整。PrivateTypeAngKAsInteg
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger,则以下叙述中正确的是()。
在窗体上画一个命令按钮Command1,然后编写如下程序:PrivateSubCommand1_Click()Dimarr()AsIntegerReDimarr(3)Fori=0To3al
要在文本框获得焦点时操作文本框中的内容,应该在()事件过程中编写程序。
有如下函致:Functionfact(xAsInteger)AsLongDimpAsLong,iAsIntegerp=1Fori=1Toxp=p*1Nex
A、B、C均为整型,执行下列语句后,窗口上将显示_______。A=7:B=2:C=11PrintA*C^2\B-A*C^2/B
软件工程的出现是由于
下列有关数据库的描述,正确的是()。
随机试题
男性,40岁,发现右颊黏膜白色斑块1个月,临床检查除右颊孤立白色斑块外未发现其他病损。你认为下列哪项提供的信息丕星以作为本病例的发病因素
抗高血压的药是抗癫痫的药是
秦律师在一起经济案件中,担任一审原告的诉讼代理人。该案上诉后,秦律师又担任原一审被告的诉讼代理人,由于需要追加第三人,二审法院将此案发回重审,秦律师又担任第三人的诉讼代理人。对秦律师的行为,应该给予什么处分?()
混凝土坝,坝段分缝分块型式可分为()。
某办公楼工程,建筑面积35000m2,地下2层,地上15层,框架筒体结构,外装修为单元式玻璃幕墙和局部干挂石材。场区自然地面标高为-2.00m,基础底标高为-6.90m,地下水位标高-7.50m,基础范围内土质为粉质黏土层。在建筑物北侧,距外墙轴线2.5m
采取抵押担保方式的,贷前调查应调查的内容不包括()。
某公司存货周转期为160天,应收账款周转期为90天,应付账款周转期为100天,则该公司现金周转期为()天。
为向A公司支付购买机器设备的货款,B公司向自己开户的C银行申请开具银行承兑汇票。C银行审核同意后,B公司依约存入C银行300万元保证金,并签发了以自己为出票人、A公司为收款人、C银行为承兑人、金额为1000万元、见票后3个月付款的银行承兑汇票,C银行在该汇
Weoftentendtoassociatesmilingastheresultofapositiveeventormood.Butresearchdemonstratesthattheactofsmiling,
Thatboywithapairofspectacleswithgold______haswonseveralscholarshipsinhisschool.
最新回复
(
0
)