网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体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拖拽到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 SubB.Private Sub banana_DragDrop(Source As Control，X As Single，Y As Single) Source．Move Picture1．Left+X，Picture 1．Top+Y End SubC.Private Sub Picturei_DragDrop(Source As Control，X As Single，Y As Single) Source．Move Picture1．Left+X，Picture1．Top+Y End SubD.Private Sub Picture1_DragDrop(Source As Control，X As Single，Y As Single) banana．Move banana．Left+X，banana．Top +Y End Sub ” 相关考题
考题
在窗体上先后画2个图片框，名称分别为Picture1和banana,banana中添加了香蕉图片（见图1），且将banana.DragMode属性设置为1。要求程序运行时，可以用鼠标把banana拖拽到Picture1中（见图2）。能实现此功能的事件过程是（）A．Priate Sub Form_DragDrop（Source As Control,X As Single,Y As Single banana.Move Picture1.Left+X,Picture1.Top+Y）End SubB．Private Sub banana _DragDrop（Source As Control,X As Single,Y As Single ）Source.Move Picture1.Left+X.Picture1.Top+YEnd SubC．Private Sub Picture1_DragDrop（Source As Control,X As Single,Y As Single ）Source.Move Picture1.Left+X.Picture1.Top+YEnd SubD．Private Sub Picture1_DragDrop（Source As Control,X As Single,Y As Single ）banana.Move banana.Left+X, banana.Top+YEnd Sub
考题
在窗体上先后画两个图片框，名称分别为Picture1和banana，banana中添加了香蕉图片(见图1)，且将bananA、DragMode属性设置为1。要求程序运行时，可以用鼠标把banana拖曳到Picttne1中(见图2)。能实现此功能的事件过程是______。A．Private Sub Form_DlagDrop(Source As Control,X As Single,Y As Single) bananA、Move Picture1.Left+X,Picture1.Top+Y End SubB．Private Sub banana_DragDrop(Source As Control,X As Single,Y As Single) SourcE．Move Picture1.Lefi+X,Picture1.Top+Y End SubC．Private Sub Picture1_DmgDrop(Source As Contro1,X As Single,Y AS Single) SourcE．Move Picture1.Left+X,Picture1.Top+Y End SubD．Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single) bananA、Move bananA、Let+X,banan.Top+Y End Sub
考题
请将香蕉banana用工具 H( )—Head( ),T( )—Tail( )从L中取出。 L=(apple,(orange,(strawberry,(banana)),peach),pear)
考题
窗体上有一个名称为List1的列表框，一个名称为Picture1的图片框。Form. Load事件过程的作用是，把Data1．txt文件中的物品名称添加到列表框中。运行程序，当双击列表框中的物品名称时，可以把该物品对应的图片显示在图片框中，如图所示，以下是类型定义及程序，请填空。Private Type PicgNane As String*10 ’物品名称picFile As String*20 ’物品图片的图片文件名End TypeDime p(4)As Pic，pRec As PicPrivate Sub Form_Load()Open”Data1．txt”For Random As1______=Len(pRec)For i=0 To 4Get1，i+1，p(i)List 1，Addltem p(i)gNameNext iClose1End SubPrivate Sub List 1_DblClick()For i=0 To 4If RTrim(List1．List(i))=RTrim(________)ThenPicture1．Picture=LoadPicture(p(i)．_______)Exit ForEnd IfNextEnd Sub
考题
在窗体上有2个图片框，名称分别为Picture1和Picture2，Picture2中添加了香蕉图片(见图3)，且将Picture2．DragMode属性设置为1。要求程序运行时，可以用鼠标把Picture2拖拽到Picture1中(见图4)。以下可以实现此功能的事件过程是（ ）。
考题
在名称为Form1的窗体上建立两个命令按钮，名称分别为Command1和Command2、标题分别为“显示”和“删除”，一个名称为Pic1的图片框。要求程序运行后，每单击一次“显示”按钮，不使用任何变量而直接在图片框中显示“Picture1”；如果单击“删除”按钮，则清除图片框中的文本，如图6-1所示。注意：保存时必须存放在考生文件夹下，窗体文件名为sj1．frm，工程文件名为Sj1．vbp。
考题
（ 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.MovePicture1.Left+X,Picture1.Top+Y ）End SubB ） Private Sub banana _DragDrop （ Source As Control,X As Single,Y As Single ）Source.Move Picture1.Left+X.Picture1.Top+YEnd SubC ） Private Sub Picture1_DragDrop （ Source As Control,X As Single,Y As Single ）Source.Move Picture1.Left+X.Picture1.Top+YEnd SubD ） Private Sub Picture1_DragDrop （ Source As Control,X As Single,Y As Single ）banana.Move banana.Left+X, banana.Top+YEnd Sub
考题
请根据以下各题的要求设计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。
考题
在窗体上建立一个驱动器列表框、目录列表框、文件列表框、图片框、文本框。要求程序运行后，驱动器列表框Drive1的默认驱动器设置为e盘，选择File1中所列的图片文件（*.bmp，*.gif和*.jpg），则相应的图片显示在图片框Picture1中，文件的路径显示在文本框中。程序运行结果如下图所示。 程序如下，请补充完整。
热门标签
最新试卷
