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

admin2019-05-14  18

问题 在名称为Form1的窗体上画一个文本框,名称为Text1,允许多行显示;再画三个命令按钮,名称分别为  C1、C2、C3,标题分别为“输入”“转换”“存盘”(如图1-55所示)。请编写适当的事件过程,使得在运行时,单击“输入”按钮,则从考生文件夹中读入in5.txt 文件(文件中只有字母和空格),放入Text1 中;单击“转换”按钮,则把Text1 中的所有小写字母转换为大写字母;单击“存盘”按钮,则把Text1 中的内容存入out5.txt 文件中。

    注意:考生必须把转换后的内容用“存盘”按钮存入out5.txt文件,否则无成绩。考生的工程文件以文件名sjt5.vbp存盘,窗体文件以文件名sjt5.frm存盘。

选项

答案【操作步骤】 步骤1:新建一个“标准EXE”工程,如表2-3在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写相应事件过程。 参考代码: Private Sub C1_Click() Open "in5.txt" For Input As #1 Input #1, a$ Text1.Text = a$ Close #1 End Sub Private Sub C2_Click() a$ = Text1.Text b$ = "" n = Len(a$) For i = 1 To n b$ = b$ + UCase$(Mid$(a$, i, 1)) Next Text1.Text = b$ End Sub Private Sub C3_Click() Open "out5.txt" For Output As #1 Print #1, Text1.Text Close #1 End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键键运行程序,先单击“输入”按钮,接着单击“转换”按钮,然后单击“存盘”按钮保存转换后的数据。

解析
转载请注明原文地址:https://jikaoti.com/ti/FxN0FFFM
0

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