在窗体Form1上绘制3个命令按钮，其名称分别为Cmd1、Cmd2和Cmd3，标题分别为“读数”、“计算”和“存盘”，

名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入书名和作者，然后单击命令按钮，则在窗体的标题栏上先，后显示两个文本框中的内容，如下图所示。

注意：

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

中“帮助”菜单含有一个子菜单，共有3个菜单项，它们的标题依次为“Visual Basic帮助”、“关于Visual Basic”、“与我们联系”，它们的名称分别为vbHelpyou、vbAbout和vbMml(如下图所示)。

注意：

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

在窗体上绘制两个标签，名称分别为Lab1和Lab2，标题分别为“请输入一个正整数 N”和“1+2+3+…+N=”；绘制两个文本框，名称分别为Text1和Text2，内容都设为空白；绘制一个命令按钮，名为Cmd1，标题为“计算”。编写适当的程序，使程序运行时，在Text1中输入一个正整数N，单击“计算”按钮，计算出1+2+3+…+1N的和显示在Text2中。

程序运行结果如下图所示。

注意：

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

框，名称分别为Chk1、Chk2和Chk3，标题依次为“数学”、“英语”和“政治”；还有一个名为Cmd1的命令按钮，标题为“显示”。

要求程序运行后，如果选中某个复选框，则当单击“显示”命令按钮时，则显示相应的信息。例如，如果选中“数学”和“英语”复选框，则单击“显示”命令按钮后，在窗体上显示“我喜欢的课程足数学英语”，如下图所示；而如果选中“数学”、“英语”和“政治”复选框，则单击“显示”按钮后，在窗体上显示“我喜欢的课程是数学英语政治”。本程序不完整，请补充完整，并能正确运行。

要求：

去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序的其他部分。最后，按原文件名并在原文件夹中保存修改后的文件。

表项。当双击列表框中的某个项目时，在标签Labell中显示所选中的项目，如图所示。请在______处填入适当的内容，将程序补充完整。

Private Sub Form. load()

Listl.AddItem “北京”

List1.AddItem “上海”

List1.AddItem “河北”

End Sub

Private Sub ______()

Labell.Caption=______

End Sub

设有如下程序

Option Base 1

Private Sub Command1_Click()

Dim arrl

Dim Min As Integer，i As Integer

arrl=Array(12，435，76，-24，78，54， 866， 43)

Min=____

For i=2 To 8

If arrl(i)＜Min Then

Next i

Print “最小值是：”；Min

End Sub

以上程序的功能是：用Arcay函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。

24.txt的文本文件，其内容如下：132 423 36 58 58 16 98 545 314 42 52 24 73 26 9 12 26 375 4 57 60 72 80 51 327。程序运行后，单击窗体，将把文件in24.txt中的数据输入到二维数组Mat中，在窗体上按5行、5列的矩阵形式显示出来，然后计算矩阵第3行各项的和，并在窗体上显示出来，如下图所示。

在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。

要求：

去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

据库运行和维护阶段。

属性设为0。请为Cmd1设置适当的属性，使得当焦点在Cmd1上时，按Esc键就调用Cmd1的Click事件，该事件过程的作用是在文本框中显示Visual Basic，程序运行结果如下图所示。

注意：

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