首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Forml的窗体上画一个文本框,名称为Text1,允许多行显示:再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“输入”、“转换”、“存盘”(如图2.244所示)。请编写适当的事件过程,使得在运行时,单击“输入”按钮,则从考生文件央中读入i
在名称为Forml的窗体上画一个文本框,名称为Text1,允许多行显示:再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“输入”、“转换”、“存盘”(如图2.244所示)。请编写适当的事件过程,使得在运行时,单击“输入”按钮,则从考生文件央中读入i
admin
2016-12-29
49
问题
在名称为Forml的窗体上画一个文本框,名称为Text1,允许多行显示:再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“输入”、“转换”、“存盘”(如图2.244所示)。请编写适当的事件过程,使得在运行时,单击“输入”按钮,则从考生文件央中读入in5.txt文件(文件中只有字母和空格),放入Text1中;单击“转换”按钮,则把Text1中的所有小写字母转换为大写字母;单击“存盘”按钮,则把Text1中的内容存入out5.txt文件中。
注意:考生必须把转换后的内容用“存盘”按钮存入out5.txt文件,否则无成绩。考生的工程文件以文件名sjt5.vbp存盘,窗体文件以文件名sjt5.frm存盘。
选项
答案
【操作步骤】 步骤1:新建一个“标准EXE”工程,如表3.132在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写相应事件过程。 参考代码: Private Sub C1 CliCk() Open”in5.txt”For Input As#1 Input #1,aS Textl.Text=a$ Close#1 End Sub Private Sub C2 C1iCk() aS=Textl.Text b$=”” n=Len(aS) For i=1 To n b$=b$+UCase$(Mid$(a$,i,1)) Next Textl.Text=b$ End Sub Private Sub C3 Click() Open”out5.txt”For Output As{}1 Print#1,Textl.Text Close#1 End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按
键键运行程序,先单击“输入”按钮,接着单击“转换”按钮,然后单击“存盘”按钮保存转换后的数据。
解析
转载请注明原文地址:https://kaotiyun.com/show/Z9Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Picturel的图片框控件,一个名称为Timerl的计时器控件,其Interval属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下:PrivateSubTimerlTimer()Static
窗体上有一个名称为Commandl的命令按钮,并有如下程序:PrivateSubCommandlClick()x=15DoWhilex2>0x=x-3x=IIf(Int(x/5)=x/5,X+2,
窗体上有一个名称为Commandl的命令按钮,其单击事件过程代码如下:PrivateSubCommandlClick()StaticxAsVariantn=0x=Array(1,2,3,4,5,6,7,8
下面不属于软件设计阶段任务的是()。
阅读程序:Subp(b()AsInteger)Fori=1To4b(i)=2(iNextiEndSubPrivateSubCommand1_Click()
下列程序中,a,b,c代表一个三角形的三条边,程序的作用是判断一个三角形是否成立,请填写空白处。Ifa+b<c______b+c<a______a+c<bThenMsgBox("这三条边不能构成一个三角形")EndIf
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()Dima1(4,4)a2(4,4)DimiAsInteger,jAsInte
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段(),完成程序。PrivateSubCommandlClick()Dimarr(1To20)
假定有如下的Sub过程:SubSub1(xAsSingle,yAssingle)t=xx=t/yy=tModyEndSub在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand
下列程序的功能是:将数据1,2,…,10写入顺序文件Base.txt中,请填空。PrivateSubForm_Click()DimiAsIntegerOpen【】As#1Fori=1To10
随机试题
医疗保险
A.蠕形螨病B.疥螨病C.脓皮症D.犬小孢子菌病E.马拉色菌病犬脱毛,搔痒,患部在暗室用伍氏灯照射呈现苹果绿荧光。最有可能的诊断是()。
对于债券利率的风险,下列叙述正确的是( )。
各题所给出的4个选项中,至少有1项符合题目要求
某工厂车组做一批零件。现有甲、乙、丙、丁四个小组,假设四组一起完成共需6小时,由甲、乙、丙三组一起完成需8小时,乙、丙、丁一起需12小时,那么甲、丁两组一起完成需要()小时。
《毛诗序》中提到了《诗经》“六艺”,即“风、赋、比、兴、雅、颂”。其中“兴”指的是()?
设A和B都是m×n实矩阵,满足r(A+B)=n,证明ATA+BTB正定.
如下图所示,某园区网用10Gbps的POS技术与Internet相连,POS接口的帧格式是SONET。园区网内部路由协议采用OSPF,与Intemet的连接使用静态路由协议。该园区网还通过一台Cisco2511和Modempool设备为用户提供拨号入网服务
WhendidtheearthquakehappeninTangshan?
Irespectyourpersistenceafterthefailure,butyou______(不该把错误推到别人身上).
最新回复
(
0
)