首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sj5.vbp在名称为Forml的窗体上画一个文本框,名称为Textl,允许多行显示;再域三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读取文本”、“大写”和“保存”,运行界面如图48
在考生文件夹下有一个工程文件sj5.vbp在名称为Forml的窗体上画一个文本框,名称为Textl,允许多行显示;再域三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读取文本”、“大写”和“保存”,运行界面如图48
admin
2009-03-26
44
问题
在考生文件夹下有一个工程文件sj5.vbp在名称为Forml的窗体上画一个文本框,名称为Textl,允许多行显示;再域三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读取文本”、“大写”和“保存”,运行界面如图48—5所示。请编写适当的事件过程,使得在运行时,单击“读取文本”按钮,则从考生文件夹中读入sjin.txt文件(文件中只有字母和空格),放入Textl中;单击“大写”按钮,则把Textl中的所有小写字母转换为大写字母;单击“保存”按钮,则把Textl中的内容存人sjout.txt文件中。
注意:去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,考生必须把转换后的内容用“保存”按钮存入sjout.txt文件,否则无成绩。考生的工程文件以文件名sj5.vbp存盘,窗体文件以文件名si5.frm存盘。
选项
答案
文本框的MuhiLine属性设置其是否能多行显示,为T1。ue表示能多行显示,为False表示不能多行显示。ScrollBars属性设置其是否有滚动条,值为0时表示没有滚动条,值为1时表示有水平滚动条,值为2时表示有垂直滚动条,值为3时表示水平、垂直滚动条都有。 对文件的操作一般包括以下步骤:打开或建立文件;进行读/写操作;关闭文件。 要将字符串的小写字母转换成大写字母,可以通过UCase函数实现。UCase函数将小写字母转换成大写字母,而大写或非字母字符均保持不变。其语法格式为:UCase(string)。省略string为任何有效的字符串表达式。 根据题意,将一个文本框控件和3个命令按钮添加到窗体中,文本框的名称为Textl、MultiLine属性为True、ScrollBar属性为2,命令按钮的名称分别为Commandl、Command2和Command3,Caption分别为“读取文本”、“大写”和“保存”,设置完成后双击Commandl进入代码编写窗口,其中Mid()函数是将字符串中的字符提取出来,以判断字符是不是小写字母,EOF()函数判断文件是否读取完成,补充后的具体代码如下: Dim rel As String Private Sub Commandl_Click() Dim str As String str="" Textl.Text=""’初始化Textl的文本 Open”App.Pathg&\sjin.txt”For
Input As#1
’打开文件,进行读取 While
EOF(1)=False
’断文件是否读取完 Input#1.str’读取文本 Textl.
Text
=Textl.
Text
+str Wend Close#1 End Sub Private Sub Cornmand2_Click() Textl.
Text
=
Ucase
(Textl.
Text
) End Sub Private Sub Command3_Click() Open”App.Path&\sjout.txt”For
Output As#2
Print#2,Textl.
Text
’将Textl中的文本存入文件中 Close#2 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/pV1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列选项中,不属于JDK文件子文件夹的是()。
下列属于Applet运行过程中的是()。
下列叙述中正确的是()。
下面程序段的输出结果是classTest{publicstaticvoidmain(Stringargs[]){MyThreadt=newMyThread();t.displayOutput(”
当一个应用程序的所有非守护线程终止运行时,但仍然有守护线程在运行,应用程序将
下列叙述中正确的是
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是()
下列常见的系统定义中的异常中,______是数组越界异常。
已知:1Stringinput=JoptionPane.showlnputDialog("Whatsyourname?");2Intage=Integer.parseIntln(input);语句2所起的作用是()。
java.lang.ThreadGroup类的作用为()。
随机试题
湿式自动喷水灭火系统主要由开式喷头、湿式报警阀组、水流指示器、末端试水装置、管道和供水设施等组成。()
某建设项目采用评标价法评标,其中一位投标人的投标报价为3000万元,工期提前获得评标优惠100万元,评标时未考虑其他因素,则评标价和合同价分别为( )。
实行强制减仓时,所有客户都应按照持仓比例自动撮合成交。()
C公司2008年末的流动资产是800万元,流动负债是400万元,则流动比率为()。
金融衍生产品是一种金融合约,其价值并不取决于一种或多种基础资产或指数。()
根据土地增值税法律制度的规定,下列各项中,可以免征土地增值税的有()。
—9,—5,0,6,()。
下列与天文无关的语句是:
设函数f(x),g(x)在[a,b]上连续,在(a,b)内具有二阶导数且存在相等的最大值f(a)=g(a),f(b)=g(b),证明存在ξ∈(a,b),使得f″(ξ)=g″(ξ)。
Jobhuntingisnevereasy,butwhatifdatacouldbeusedtomaketheprocessalittlelessstressful?CompaniessuchasLin
最新回复
(
0
)