问答题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为Picture1的图片框(PictureBox)，高、宽均为1000。在图片框内再画一个有边框的名称为Image1的图像框(Image)。并通过属性窗口把考生目录下的图标文件POINTl1(香蕉图标)装入图像框Image1中，如图3—170所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画一个名称为Command1、标题为“保存文件”的命令按钮，再画一个名称为CommonDialog1的通用对话框。要求：①通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为out2；②运行时单击“保存文件”按钮，则以“保存对话框”方式打开该通用对话框。如图3—171所示。
(2)在名称为Form1的窗体上画一个名称为Command1、标题为“保存文件”的命令按钮，再画一个名称为CommonDialog1的通用对话框。要求：①通过属性窗口设置适当的属性，使得运行时对话框的标题为“保存文件”，且默认文件名为out2；②运行时单击“保存文件”按钮，则以“保存对话框”方式打开该通用对话框。如图3—171所示。
【正确答案】正确答案：第1小题 步骤1：新建一个“标准ExE”工程，按要求画出控件并设置属性。 步骤2：按要求将文件保存至考生文件夹中。 第2小题 步骤1：新建一个“标准EXE”工程，选择[工程]→[部件]命令，在弹出的“部件”对话框的列表中选中“MicroSoft Common Dialog Control6．0”项目，单击“确定”按钮。 步骤2：在窗体Form1上画一个通用对话框和一个命令按钮并设置相关属性。 步骤3：打开的代码编辑窗口中，编写命令按钮的单击事件过程。 Private Sub Command1_Click() CommonDialog1．Action=2 '或CommonDialog1．ShowSave End Sub 步骤4：按要求将文件保存至考生文件夹中。
【答案解析】解析：第1小题：本题只需按照要求画出控件并设置属性即可，注意图像框要画在图片框内部。 第2小题：通用对话框的默认文件名由FileName属性设置，标题由DialogTitle属性设置。本题可在“保存文件”的单击事件过程中，用语句通过调用通用对话框的ShowSave方法或通过设置其Action属性值为2，使其以“保存对话框”方式打开。