在一个工程文件ylc5.vbp，工程中已有一个Aver函数过程，其功能是通过计算求数组的和。程序运行后，在

则弹出“打开”对话框，默认文件类型为“文本文件”，默认目录为考生目录。选中in5．txt文件，如图6(a)所示，单击“打开”按钮，则把文件中的内容读入并显示在文本框(Text1)中；单击“修改内容”按钮，则可把Text1中的大写字母“E”、“N”、“T”改为小写，把小写字母“e”、“n”、“t”改为大写；单击“保存文件”按钮，则弹出“另存为”对话框，默认文件类型为“文本文件”默认目录为考生目录，默认文件为“out5．txt”，如图6(b)所示，单击“保存”按钮，则把Text1中修改后的内容存到out5．tXt文件中。 窗体中已经给出了历有控件和程序，但程序不完整，去掉程序中的注释符，把程序中的?改为正确的内容，并编写“修改内容”按钮的Click事件过程。 注意：考生不得修改已经存在的程序。必须把Text1中修改后的内容用“保存文件”按钮存储结果，否则无成绩。最后，按原文件名把程序存盘。

立一个名称为Commandl的命令按钮数组，含三个命令按钮，它们的Index属性分别为0、1、2，标题依次为“是”、“否”、“取消”，每个按钮的高、宽均为300、800。窗体的标题为“按钮窗口”。运行后的窗体如图4所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。(2)在名称为Forml的窗体上画一个名称为Shal的形状控件，然后建立一个菜单，标题为“形状”，名称为shape0，该菜单有两个子菜单，其标题分别为“正方形”和“圆形”，其名称分别为shape1和shape2，如图5所示，然后编写适当的程序。程序运行后，如果选择“正方形”菜单项，则形状控件显示为正方形；如果选择“圆形”菜单项，则窗体上的形状控件显示为圆形。 注意：程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为sjit2.vbp．窗体文件名为sjt2.frm。

画两个标签，其名称分别是Label1和Label2，标题分别为“单词的平均长度为”和“最长单词的长度为”：再画两个名称分别为Text1和Text2、初始内容为空的文本框，如图10 所示。程序功能如下： ①如果单击“读数据”命令按钮，则将考生文件夹下in5．dat文件的内容读到变量S中(此过程已给出)； ②如果单击“统计”按钮，则自动统计变量S(s中仅含有字母和空格，而空格是用来分隔不同单词的)中每个单词的长度，并将所有单词的平均长度(四舍五入取整)显示在Text1文本框内， 将最长单词的长度显示在Text2文本框内。 “读数据”命令按钮的Click事件过程已经给出，请为“统计”命令按钮编写适当的事件过程，实现上述功能。 注意：考生不得修改牙体文件中已经存在的控件和程序，在结束程序之前，必须进行统计，且必须通过单击窗体右上角的“关闭”按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

个名称为Picture1的图片框(PictureBox)，高、宽均为1000。在图片框内再画一个有边框的名称为Image1的图像框(Image)。并通过属性窗口把考生目录下的图标文件POINTl1(香蕉图标)装入图像框Image1中，如图3所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。(2)在名称为Form1的窗体上画一个名称为Command1、标题为“保存文件”的命令按钮，再画一个名称为CommonDialog1的通用对话框。 要求：①通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为out2 1 ②运行时单击“保存文件”按钮，则以“保存对话框”方式打开该通用对话框。如图4所示。注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sjt2．frm。

令按钮，名称为C1，标题为“确定”；请画两个单选按钮，名称分别为Op1、Op2，标题分别为“男生”、“女生”；再画两个复选框，名称分别为Ch1、Ch2，标题分别为“体育”、“音乐”。请编写适当的事件过程，使得在运行时，单击“确定”按钮后实现下面的操作： ①根据选中的单选按钮，在Text1中显示“我是男生”或“我是女生”。 ②根据选中的复选框，在Text2中显示“我的爱好是体育”、“我的爱好是音乐”或“我的爱好是体育音乐”，如图6所示。 注意：不得修改已经给出的程序和已有控件的属性。在结束程序运行之前，必须选中一个单 选按钮和至少一个复选框，并单击“确定”按钮。必须使用窗体右上角的关闭按钮结束程序，否则无成绩。

(2)在考生文件夹下有一个工程文件sjt4．vbp。窗体上有一个名称为List1的列表框，名称为Timerl的计时器，名称为Labell的标签，如图8所示。请通过属性窗口向列表框添加四个项目，分别是“第一项”、“第二项”、“第三项”、“第四项”。程序运行后，将计时器的时间间隔设置为1 秒钟，每一秒钟从列表框中取出一个项目显示在Label1的标签中，首先显示“第一项”，然后，依次显示“第二项”、“第三项”、“第四项”，如此循环。 在给出的窗体文件中已经有了全部控件和程序，但不完整，请添加List1中的项目，去掉程序中的注释符，把程序中的?改为正确的内容。 注意：考生不得修改工程中已经存在的内容和控件属性，最后把修改后的文件按原文件名存盘。

命令按钮，则把窗体的标题修改为VisualBasic，程序运行结果如下图所示。

注意：

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

单击命令按钮，则在窗体上显示ViSBa1 Basic；如果单击窗体，则命令按钮消失。程序运行情况如下图所示。

注意：

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

请填写下列空白以实现运行后形成一个主对角线上元素值为l，其他元素为0的6×6阶矩阵。

Private Sub Command1_Click()

Dim s (6,6)

For i=1 To 6

For i=1 To 6

If i=j Then

_________

Else

___________

End If

Print _________

Next j

Print

Next i

End Sub