2. 计算机
  3. 在考生文件夹下有一个工程文件sj5．vbp在名称为Forml的窗体上画一个文本框，名称为Textl，允许多行显示；再域三个命令按钮，名称分别为Commandl、Command2和Command3，标题分别为“读取文本”、“大写”和“保存”，运行界面如图48

在考生文件夹下有一个工程文件sj5．vbp在名称为Forml的窗体上画一个文本框，名称为Textl，允许多行显示；再域三个命令按钮，名称分别为Commandl、Command2和Command3，标题分别为“读取文本”、“大写”和“保存”，运行界面如图48

admin2009-03-26  34
问题 在考生文件夹下有一个工程文件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全国计算机二级

相关试题推荐
随机试题
最新回复(0)