itgle.com
在窗体E先后画2个图片框，名称分别为Picture1和banana，banana中添加了香蕉图片，如图1所示，且将banana．DragMode属性设置为1。要求程序运行时，可以用鼠标把banana拖拽到Picture1中，如图2所示。能实现此功能的事件过程是（ ）。A.Private 3ub Form—DragDrop(Source As Control，X As Single，Y As Single) banana．Move Picture1．Left+X，Picture1．Top+Y End Sub
题目
在窗体E先后画2个图片框，名称分别为Picture1和banana，banana中添加了香蕉图片，如图1所示，且将banana．DragMode属性设置为1。要求程序运行时，可以用鼠标把banana拖拽到Picture1中，如图2所示。能实现此功能的事件过程是（ ）。
A.Private 3ub Form—DragDrop(Source As Control，X As Single，Y As Single) banana．Move Picture1．Left+X，Picture1．Top+Y End Sub
B.Private Sub banana_DragDrop(Source As Control，X As Single，Y As Single) Source．Move Picture1．Left+X，Picture 1．Top+Y End Sub
C.Private Sub Picturei_DragDrop(Source As Control，X As Single，Y As Single) Source．Move Picture1．Left+X，Picture1．Top+Y End Sub
D.Private Sub Picture1_DragDrop(Source As Control，X As Single，Y As Single) banana．Move banana．Left+X，banana．Top +Y End Sub
相似考题
更多“ 在窗体E先后画2个图片框，名称分别为Picture1和banana，banana中添加了香蕉图片，如图1所示，且将banana．DragMode属性设置为1。要求程序运行时，可以用鼠标把banana拖拽到Pict”相关问题
-
第1题：
在窗体上有2个图片框，名称分别为Picture1和Picture2，Picture2中添加了香蕉图片(见图3)，且将Picture2．DragMode属性设置为1。要求程序运行时，可以用鼠标把Picture2拖拽到Picture1中(见图4)。以下可以实现此功能的事件过程是（ ）。
正确答案：C
C) 【解析】本题考查拖放事件。把Picture2拖到Picture1中，设置Picture的DragMode属性为1，启动自动拖放模式。将Picture2拖到Picture1中，图像本身不会移动，但是在Picture1 上触发DragDrop事件，可以在该事件过程中通过Move方法来实现Picture2的移动。
-
第2题：
（ 32 ） 在窗体上先后画 2 个图片框 ， 名称分别为 Picture1 和 banana,banana 中添加了香蕉图片 （ 见图 A-2） ，且将 banana.DragMode 属性设置为 1 。要求程序运行时，可以用鼠标把 banana 拖拽到 Picture1 中（见 图A-3 ）。能实现此功能的事件过程是（ ）
A ） Priate Sub Form_DragDrop （ Source As Control,X As Single,Y As Single banana.Move
Picture1.Left+X,Picture1.Top+Y ）
End Sub
B ） Private Sub banana _DragDrop （ Source As Control,X As Single,Y As Single ）
Source.Move Picture1.Left+X.Picture1.Top+Y
End Sub
C ） Private Sub Picture1_DragDrop （ Source As Control,X As Single,Y As Single ）
Source.Move Picture1.Left+X.Picture1.Top+Y
End Sub
D ） Private Sub Picture1_DragDrop （ Source As Control,X As Single,Y As Single ）
banana.Move banana.Left+X, banana.Top+Y
End Sub
正确答案：C
-
第3题：
在窗体上建立一个驱动器列表框、目录列表框、文件列表框、图片框、文本框。要求程序运行后，驱动器列表框Drive1的默认驱动器设置为e盘，选择File1中所列的图片文件（*.bmp，*.gif和*.jpg），则相应的图片显示在图片框Picture1中，文件的路径显示在文本框中。程序运行结果如下图所示。
程序如下，请补充完整。 
略 -
第4题：
在名称为Form1的窗体上建立两个命令按钮，名称分别为Command1和Command2、标题分别为“显示”和“删除”，一个名称为Pic1的图片框。要求程序运行后，每单击一次“显示”按钮，不使用任何变量而直接在图片框中显示“Picture1”；如果单击“删除”按钮，则清除图片框中的文本，如图6-1所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sj1．frm，工程文件名为Sj1．vbp。正确答案：
命令按钮的标题由Caption属性设置，单击命令按钮触发Click事件。打印信息用Print方法，清除用Cls方法。
根据题意，新建“标准EXE”工程，在窗体中添加一个图片框控件和两个命令按钮，将两个命令按钮的Caption属性为“显示”和“删除”，然后双击Command1进入代码窗口，编写如下代码：
Private Sub Command1 Click 显示“Picture1”
Pic1．Print”Picture1”
End SubPrivate Sub Command2 Click 清除“Picture1”
Pic1．Cls
End Sub
单击
按钮运行程序，并按要求保存。
-
第5题：
请根据以下各题的要求设计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。
正确答案：
【知识点拔】①窗体、图像框(ImageBox)和图片框(PictureBox) 上均可以显示来自位图、图标元文件、JPEG或GIF文件的图形。区别在于：图像框专门用于显示位图，而另外两种还提供了画图的功能。为图片框控件指定图片有两种方法：一是在设计阶段通过Picture属性设置：二是在程序运行时通过LoadPicture图片加载函数加载。②图片框作为一个容器，在图片框上可以再画图片框或者图像框。
【审题分析】本题只需按照要求画出控件并设置属性即可，注意图像框要画在图片框内部。
【操作步骤】
步骤1：新建一个“标准EXE”工程，如表1-14在窗体中画出控件并设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题
【审题分析】通用对话框的默认文件名由FileName属性设置，标题由DialogTitle属性设置。本题可在“保存文件”的单击事件过程中，用语句通过调用通用对话框的ShowSave方法或通过设置其Action属性值为2，使其以“保存对话框”方式打开。
【操作步骤】
步骤1：新建一个“标准EXE”工程，选择【工程】->【部件】命令，在弹出的“部件”对话框的列表中选中“MicroSoft Common
Dialog Cortlrol6．0”项目，单击“确定”按钮。
步骤2：在窗体Form1上画一个通用对话框和一个命令按钮，其相关属性设置如表1-15所示。
程序如下，请补充完整。 
