请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上画一个名称为Picture1的图片框(PictureBox)，高、宽均为1000。在图片框内再画一个有边框的名称为Image1的图像框(Image)。并通过属性窗口把考生目录下的图标文件POINTl1(香蕉图标)装入图像框Image1中，如图3所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。

(2)在名称为Form1的窗体上画一个名称为Command1、标题为“保存文件”的命令按钮，再画一个名称为CommonDialog1的通用对话框。

要求：①通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为out2 1

②运行时单击“保存文件”按钮，则以“保存对话框”方式打开该通用对话框。如图4所示。注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sjt2．frm。

在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有两个标题分别为“读数据”和“统计”的命令按钮。请画两个标签，其名称分别是Label1和Label2，标题分别为“单词的平均长度为”和“最长单词的长度为”：再画两个名称分别为Text1和Text2、初始内容为空的文本框，如图10 所示。程序功能如下：

①如果单击“读数据”命令按钮，则将考生文件夹下in5．dat文件的内容读到变量S中(此过程已给出)；

②如果单击“统计”按钮，则自动统计变量S(s中仅含有字母和空格，而空格是用来分隔不同单词的)中每个单词的长度，并将所有单词的平均长度(四舍五入取整)显示在Text1文本框内，

将最长单词的长度显示在Text2文本框内。

“读数据”命令按钮的Click事件过程已经给出，请为“统计”命令按钮编写适当的事件过程，实现上述功能。

注意：考生不得修改牙体文件中已经存在的控件和程序，在结束程序之前，必须进行统计，且必须通过单击窗体右上角的“关闭”按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

内聚性是对模块功能强度的衡量，下列选项中，内聚性较弱的是（　　）。

请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上画一个名称为Picture1的图片框(PictureBox)，高、宽均为1000。在图片框内再画一个有边框的名称为Image1的图像框(Image)。并通过属性窗口把考生目录下的图标文件POINTl1(香蕉图标)装入图像框Image1中，如图3所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。

(2)在名称为Form1的窗体上画一个名称为Command1、标题为“保存文件”的命令按钮，再画一个名称为CommonDialog1的通用对话框。

要求：①通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为out2 1

②运行时单击“保存文件”按钮，则以“保存对话框”方式打开该通用对话框。如图4所示。注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sjt2．frm。

(1)考生文件夹中有工程文件sjt3．vbp。在窗体上有名称为Combo1的组合框，请设置该组合框的属性，使该组合梃只能用于选择操作，不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项，如图5(a)所示，单击“输入正整数”按钮，通过输入对话框输入一个正整数，再单击“判断”按钮，则按照选定的选项内容，将判断结果显示在信息框中。如图5(b)所示的是输入56且选中的组合框选项为“判奇偶数”时显示的信息框。

在给出的窗体文件中已经有了全部控件，但程序不完整，要求：按照题目要求设置组合框的

有关属性，去掉程序中的注释符，把程序中的?改为正确的内容。   、

注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。

(2)在考生目录下有一个工程文件sjt4．vbp。窗体上有一大一小两个名称分别为Shape2、Shape1的Shape控件。请在属性窗口中将Shape1控件设置为圆形，并将其颜色设置为红色(颜色值为&H000000FF&)，如图6所示。

要求：当单击窗体时，Shape1移动到矩形(即 Shape2)左上角，再次单击窗体，则Shapel移动到矩形的右下角。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：在属性窗口中设置有关的属性值，去掉程序中的注释符，把程序中的?改为正确的内容。

注意：不能修改程序的乓他部分和控件属性。最后把修改后的文件按原文件名存盘。

有如下的一个函数过程：

通过以下事件过程阔用该函数，程序运行后，在输入对话框中输入数字“123”，则运行结果为（　　）。

在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下事件过程：

下列选项中，不属于模块间耦合的是（　　）。

下列有关标准模块的叙述中，错误的是（　　）。

文本框接受的最长字符数由文本框的（　　）属性确定。