niusouti.com

在名为Form1的窗体上建立3个菜单(名称分别为vbRead、vbCalc和vbSave，标题分别为“读数”、“计算”和“保存”)，然后绘制一个文本框(名称为Text1，MultiLine属性设置为True，ScrollBars属性设置为2)，如下图所示。程序运行后，如果执行“读数”命令，则读入in.txt文件中的100个整数，放入一个数组中，数组的下界为1；如果执行“计算”命令，则把该数组中下标为偶数的元素在文本框中显示出来，求出它们的和，并把所求得的和在窗体上显示出来：如果执行“保存”命令，则把所求得

题目

在名为Form1的窗体上建立3个菜单(名称分别为vbRead、vbCalc和vbSave，标题分别为“读数”、“计算”和“保存”)，然后绘制一个文本框(名称为Text1，MultiLine属性设置为True，ScrollBars属性设置为2)，如下图所示。

程序运行后，如果执行“读数”命令，则读入in.txt文件中的100个整数，放入一个数组中，数组的下界为1；如果执行“计算”命令，则把该数组中下标为偶数的元素在文本框中显示出来，求出它们的和，并把所求得的和在窗体上显示出来：如果执行“保存”命令，则把所求得的和存入考生文件夹下的out.txt文件中。

在考生文件夹下有一个工程文件execise58.vbp，考生可以装入该文件。窗体文件 exeCise58.frm中的ReadData过程可以把in58.txt文件中的100个整数读入Arr数组中：而WriteDam过程可以把指定的整数值写到考生文件夹指定的文件中(整数值通过计算求得，文件名为out58.txt)。

注意：

考生不得修改窗体文件中已经存在的程序。保存时，工程文件名仍为execise58.vbp，窗体文件名仍为execise58.frm。

相似考题

1.在名为Form1的窗体上绘制一个文本框，名为Text1，无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名为Op，此菜单下含有两个菜单项，名称分别为Dis和Hid，标题分别为“显示”和“隐藏”。请编写适当的事件过程，使得在运行时，单击“显示”，菜单项：则在文本框中显示“等级考试”；如果单击“隐藏”命令，则隐藏文本框。运行时的窗体如下图所示。注意：文件必须存放在考生文件夹中，工程文件名为execise102.vbp，窗体文件名为 execiSe102.frm。

2.在名称为Forml的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：Private SUb Form_CnCk()Open"d:\tes\smtext1.txt"For Input AS 1Do While Not EOF(1)Line Iput 1,aspect$whole$=whole$+aspect$+Chf$(13)+Chr$(10)Loop

3.在窗体Form1上建立3个菜单(名称分别为vbRead、vbCalc和vbSave，标题分别为“读数”、“计算”和“保存”)，然后绘制一个文本框(名称为Text1，MultiLine属性设置为Tree，ScrollBars属性设置为2)，如下图所示。程序运行后，如果执行“读数”命令，则读入in49.txt文件中的100个整数，放入一个数组中，数组的下界为1；如果执行“计算”命令，则把该数组中小于50的元素在文本框中显示出来，求出它们的和，并把所求得的和在窗体上显示出来；如果执行“保存”命令，则把所求得的和存入考生文件夹下的out49.txt文件中。在考生文件夹下有一个工程文件execise49.vbp，考生可以装入该文件。窗体文件 execise49.frm中的ReadData过程可以把in49.txt文件中的100个整数读入Arr数组中：而 WriteData过程可以把指定的整数值写到考生文件夹指定的文件中(整数值通过计算求得，文件名为out49.txt)。注意：考生不得修改窗体文件中已经存在的程序。保存时，工程文件名仍为execise49.vbp，窗体文件名仍为execise49.frm。

4.在Form1的窗体上绘制一个名为Text1的文本框，然后建立一个主菜单，标题为“操作”，名为vbOp，该菜单有两个菜单项，其标题分别为“显示”和“隐藏”，名称分别为 vbDis和vbHide。编写适当的事件过程，使程序运行后；若单击“操作”菜单中的“显示”命令，则在文本框中显示Visual Basic：如果单击“隐藏?命令，则隐藏文本框。程序的运行情况如下图所示。注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为execise72.vbp，窗体文件名为execise72.frm。

更多“ 在名为Form1的窗体上建立3个菜单(名称分别为vbRead、vbCalc和vbSave，标题分别为“读数”、“计算”和“保存”)，然后绘制一个文本框(名称为Text1，MultiLine属性设置为True，Sc”相关问题

  • 第1题：

    在Form1窗体上绘制一个名为Text1的文本框，然后建立一个主菜单，标题为“操作”，名为vbOp，该菜单有两个菜单项，其标题分别为“显示”和“清除”，名称分别为vbDis和vbClear。编写适当的事件过程，使程序运行后，若单击“操作”菜单中的“显示”命令，在文本框显示VisualBasic；如果单击“清除”命令，则清除文本框中显示的内容。程序的运行情况如下图所示。

    注意：

    文件必须存放在考生文件夹中，工程文件名为execise9.vbp，窗体文件名为execise9.frm。


    正确答案：

  • 第2题：

    在窗体Form1上建立3个菜单(名称分别为vbRead、vbCalc和vbSave，标题分别为“读数”、“计算”和“存盘”)，然后绘制一个文本框(名称为Text1，MultiLine属性设置为True，ScrollBars属性设置为2)，如下图所示。

    程序运行后，如果执行“读数”命令，则读入in45.txt文件中的100个整数，放入一个数组中，数组的下界为1；如果执行“计算”命令，则把该数组中下标为奇数的元素在文本框中显示出来，求出它们的和，并把所求得的和在窗体上显示出来；如果执行“存盘”命令，则把所求得的和存入考生文件夹下的out45.txt文件中。

    在考生文件夹下有一个工程文件execise45.vbp，考生可以装入该文件。窗体文件 execise45.frm中的ReadData过程可以把in45.txt文件中的100个整数读入Arr数组中；而 WriteData过程可以把指定的整数值写到考生文件夹指定的文件中(整数值通过计算求得，文件名为out45.txt)。

    注意：

    考生不得修改窗体文件中已经存在的程序。存盘时，工程文件名仍为execise45.vbp，窗体文件名仍为execise45.frm。


    正确答案：

  • 第3题：

    在名为Form1的窗体上建立两个主菜单，其标题分别为“文件”和“帮助”，名称分别为vbFi1e和vbHe1p，在“文件”菜单下有3个菜单项，分别为“新建”、“打开”和“保存” (其名称分别为vbNew、vbOpen和vbSave)。

    要求程序运行后，如果选中“文件”下的某个菜单项，则将该菜单项的标题通过MsgBox对话框显示出来，如下图所示。

    注意：

    文件必须存放在考生文件夹中，窗体文件名为execise47.frm，工程文件名为 execise47.vbp。


    正确答案：

  • 第4题：

    在名称为Forml的窗体上建立两个主菜单，其标题分别为“文件”和“编辑”，名称分别为vbFile和VbEdit，在“文件”菜单下有三个子菜单项，标题分别为“打开”、“保存”和“关闭”，名称分别为vbOpen、vbSave和vbClose。要求程序运行后，如果选中“文件”下的某个菜单项，则通过MsgBox对话框显示该菜单项的标题，如图6-3所示。注意：保存时必须存放在考生文件夹下，窗体文件名为sj3．frm，工程文件名为sja．vbp。


    正确答案：
    本题主要考查MsgBox函数的使用。MsgBox函数用于在对话框中显示消息，等待用户单击按钮，并返回一个Integer告诉用户单击哪一个按钮。其格式为：MsgBox(prompt[，buttons][，title] [，helpfile，conText])。Prompt参数是必选的，是字符串表达式，作为显示在对话框中的消息；Buttons是可选的，是数值表达式值的总和，指定显示按钮的数目及形式；Title是可选的，是在对话框标题栏中显示的字符串表达式。如果省略title，则将应用程序名放在标题栏中；Helpfile是可选的，是字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件；ConText是可选的，是数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。
    在窗体空白处单击右键，按“Ctrl+E”组合键打开菜单编辑器，添加菜单项如下：


    标签

    名 称

    内缩

    文件

    vbFile

    无

    打开

    vbOpen

    一位

    保存

    vbSave

    一位

    关闭

    vbClose

    一位

    编辑

    vbEdit

    无

    单击“确定”按钮，菜单建立完成后，进入代码窗口编写以下代码：
    Private Sub vbClose_Click关闭命令调用的函数
    MsgBox("关闭")
    End Sub

    Private Sub vbOpen—Click 打开命令调用的函数
    MsgBox("打开")
    End Sub

    Private Sub vbSave_Click 保存命令调用的函数
    MsgBox("保存")
    End Sub
    单击按钮运行程序，并按要求保存。

  • 第5题：

    在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入姓名和年龄，然后单击命令按钮，则在窗体上显示两个文本框中的内容，如下图所示。

    注意：

    程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise57.vbp，窗体文件名为execise57.frm。


    正确答案：

相关内容