2. 计算机
  3. 在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有一个名称为CD1的通用对话框；有一个文本框，名称为Text1，可以多行显示；还有三个命令按钮，名称分别为C1、C2、C3，标题分别为“打开文件”、“转换”、“存盘”，如图所示。 命令按钮的功能是：“打

在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有一个名称为CD1的通用对话框；有一个文本框，名称为Text1，可以多行显示；还有三个命令按钮，名称分别为C1、C2、C3，标题分别为“打开文件”、“转换”、“存盘”，如图所示。 命令按钮的功能是：“打

admin2020-07-22  31
问题  在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有一个名称为CD1的通用对话框；有一个文本框，名称为Text1，可以多行显示；还有三个命令按钮，名称分别为C1、C2、C3，标题分别为“打开文件”、“转换”、“存盘”，如图所示。
命令按钮的功能是：“打开文件”——弹出“打开文件”对话框，默认打开文件的类型为“文本文件”。选择考生文件夹下的in5．txt文件后，该文件中的内容显示在Text1中；“转换”——把Text1中的所有小写英文字母转换成大写；“存盘”——把Text1中的内容存人考生文件夹下的out5．dat文件中。在窗体中已经给出了部分程序，要求：
    ①请去掉程序中的注释符，把程序中的?改为正确的内容。但不能修改程序中的其他部分，也不能修改控件的属性。
    ②编写“转换”按钮的Click事件过程。最后将修改后的文件按原文件名存盘。
    注意：考生不得修改已有的程序和控件的属性，必须对考生文件夹下的in5．txt文件进行转换，并把转换结果通过“存盘”按钮存人考生文件夹下的out5．dat文件中，否则无成绩。
选项
答案【操作步骤】 步骤1：打开本题工程文件。 步骤2：分析并编写程序代码。 程序提供代码 Private Sub C1_Click() Dim a As String CD1.Filter = "所有文件|*.*|文本文件|*.txt|Word文件|*.doc" ’　CD1.FilterIndex = ? CD1.Action = 1 Open CD1.FileName For Input As #1 Input #1, a Close #1 ’　Text1.Text = ? End Sub Private Sub C2_Click() End Sub Private Sub C3_ Click() CD1.FileName = "out5.dat" ’　CD1.Action = ? Open CD1.FileName For Output As #1 Print #1, Text1.Text Close #1 End Sub 程序结束 参考答案 第1个？处填入：2 第2个？处填入：a 第3个？处填入：2 "转换"按钮的事件过程： Private Sub C2_Click() Text1.Text = UCase(Text1.Text) End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/YMHp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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