在窗体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。

在窗体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。


相关考题:

在名为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。

在名称为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

在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Textl和Text2,初始内容均为空)和一个命令按钮(名称为Command1,标题为“显示”)。然后编写命令按钮的Click事件过程。程序运行后,在两个文本框中分别输人姓名和年龄,然后单击“显示”按钮,则在窗体上显示两个文本框中的内容,如图所示。要求程序中不得使用任何变量。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjtl.vbp,窗体文件名保存为sjtl.frm。

在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2,标题分别为“书名”和“作者”)、两个文本框(名称分别为Text1和Text2,Text属性均为空白)和一个命令按钮(名称为Cmd1,标题为Display)。然后编写命令按钮的Click事件过程,使程序运行后,在两个文本框中分别输入书名和作者,然后单击命令按钮,则在窗体的标题栏上先,后显示两个文本框中的内容,如下图所示。注意:要求程序中不得使用任何变量;文件必须存放在考生文件夹中;工程文件名为 execise51.vbp,窗体文件名为execise51.frm。

在Form1窗体上绘制一个名为Text1的文本框,然后建立一个主菜单,标题为“操作”,名为vbOp,该菜单有两个菜单项,其标题分别为“显示”和“清除”,名称分别为vbDis和vbClear。编写适当的事件过程,使程序运行后,若单击“操作”菜单中的“显示”命令,在文本框显示VisualBasic;如果单击“清除”命令,则清除文本框中显示的内容。程序的运行情况如下图所示。注意:文件必须存放在考生文件夹中,工程文件名为execise9.vbp,窗体文件名为execise9.frm。

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

在窗体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。

在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2,Text属性均为空白)和一个命令按钮(名称为Cmd1,标题为Display)。然后编写命令按钮的Click事件过程,使程序运行后,在两个文本框中分别输入姓名和年龄,然后单击命令按钮,则在窗体上显示两个文本框中的内容,如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise57.vbp,窗体文件名为execise57.frm。

在名为Form1的窗体上建立两个主菜单,其标题分别为“文件”和“帮助”,名称分别为vbFi1e和vbHe1p,在“文件”菜单下有3个菜单项,分别为“新建”、“打开”和“保存” (其名称分别为vbNew、vbOpen和vbSave)。要求程序运行后,如果选中“文件”下的某个菜单项,则将该菜单项的标题通过MsgBox对话框显示出来,如下图所示。注意:文件必须存放在考生文件夹中,窗体文件名为execise47.frm,工程文件名为 execise47.vbp。