在名称为Forml的窗体上画一个文本框,名称为Text1,允许多行显示:再画三个命令按钮,名称分别为C1、C2、C3,标题分别为“输入”、“转换”、“存盘”(如图2.244所示)。请编写适当的事件过程,使得在运行时,单击“输入”按钮,则从考生文件央中读入i

admin2016-12-29  27

问题 在名称为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://jikaoti.com/ti/7Hy0FFFM
0

最新回复(0)