在窗体上先后画两个图片框，名称分别为Picture1和banana，banana中添加了香蕉图片(见图1)，且将banana.DragMode属性设置为1。要求程序运行时，可以用鼠标把banana拖曳到Picttne1中(见图2)。能实现此功能的事件过程是______。
A. Private Sub Form_DlagDrop(Source As Control,X As Single,Y As SinglbananMove Picture1.Left+X,Picture1.Top+Y End Sub
B. Private Sub banana_DragDrop(Source As Control,X As Single,Y As SinglSourcMove Picture1.Lefi+X,Picture1.Top+Y End Sub
C. Private Sub Picture1_DmgDrop(Source As Contro1,X As Single,Y AS SinglSourcMove Picture1.Left+X,Picture1.Top+Y End Sub
D. Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As SinglbananMove bananLet+X,banaTop+Y End Sub
查看答案
相关试题
换一换
窗体上有两个图片框为Picture1和Picture2，当把Picture1拖到Picture2上时将Picture2中的图片改为Picture1中的图片，完成下列程序。 Private Sub Picture2______（Source As Control, X As Single, Y As Single, State As Integer)Picture2.Picture=______ E
答案
在窗体上先后画两个图片框，名称分别为Picture1和banana，banana中添加了香蕉图片(见图1)，且将banana.DragMode属性设置为1。要求程序运行时，可以用鼠标把banana拖曳到Picttne1中(见图2)。能实现此功能的事件过程是______。
A.Private Sub Form_DlagDrop(Source As Control,X As Single,Y As SinglbananMove Picture1.Left+X,Picture1.Top+Y End Sub B.Private Sub banana_DragDrop(Source As Control,X As Single,Y As SinglSourcMove Picture1.Lefi+X,Picture1.Top+Y End Sub C.Private Sub Picture1_DmgDrop(Source As Contro1,X As Single,Y AS SinglSourcMove Picture1.Left+X,Picture1.Top+Y End Sub D.Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As SinglbananMove bananLet+X,banaTop+Y End Sub
答案
在窗体上先后画2个图片框,
A.Private Sub Form_ Drag Drop ( Source As Contro1,X as single ,Y As Single )banana. Move Picture1.left+X,Picture.Top+Y End Sub B.Private Sub banana_ Drag Drop(Source As Control,X As Single ,Y As Singe ) SOURCE. Move Picture1.left+X,Picture.Top+Y End Sub C.Private sub Picture1 Drag Drop(Source As Control,X As Single,Y As Single) D.Private Sub Picture1_ Drag Drop(Source As Control,X As Single,Y As Single)
答案
假定Picture1和Text1分别是图片框和文本框的名称，下列不正确的是（ ）。
答案
假定Picture1和Text1分别为图片框和文本框的名称，则下列错误的语句是（）
A.Print25 B.Picture1.Print25 C.Text1.Print25 D.Debug.Print25
答案
窗体中有图片框（Picture1)和计时器（Timer1)两个控件。程序运行时，将图片加载到图片框中，然后图片框以每秒一次的速度向窗体的右下角移动，每次向左、向右移动300twip。请填空。 Private Sub Form_Load（) Picture1.Picture=LoadPieture（"c:My Documents图片Qian1_Icon02.ico") ______ End Sub
答案
假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是________。
答案
窗体中有图片框（Picture1)和计时器（Timer1)两个控件。程序运行时，将图片加载到图片框中，然后图片框以每秒一次的速度向窗体的右下角移动，每次向左、向右移动300twip。请填空。 Private Sub Form_Load（)Picture1.Picture=LoadPieture（"c:My Documents图片Qian1_Icon02.ico")______ End Sub P
答案
窗体上有一个名称为Picture1的图片框控件。一个名称为Label1的标签控件，如图所示。现有如下程序：对以上程序，下列叙述中错误的是（）
A.程序运行时会出错 B.单击图片框，在图片框中显示一幅图片 C.过程中的x是控件变量 D.单击标签，在标签中显示一串文字
答案
窗体中有图片框（Picture1)和计时器（Timer1)两个控件。程序运行时，将图片加载到图片框中，然后图片框以每秒一次的速度向窗体的右下角移动，每次向左、向右移动 300twip。请在程序空白处填入适当内容使程序完整。 Private Sub Form_Load（)Picture1.Picture = LoadPicture（"c:My Documents图片Qian1_Icon02.ico
答案
热门试题
窗体上有一个名称为Picture1的图片控件，一个名称为Timer的计时器控件，其Interval属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下：Private Sub Timer1_Timer（)Static n As Integern=n+1If （n/5)=Int（n/5) And Picture1.Left Picture1.Left=Picture1.Left+100
在图片框控件Picture1上坐标(x,y)处画一个绿色点，写作（）。
在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是_________。
在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是（）
在代码中清除图片框Picture1中的图形的正确语句是（）
窗体上有一个名称为Picture1的图片控件，一个名称为Timer的计时器控件，其Interval属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下：Private Sub Timer1_Timer( )Static n As Integern=n+1If (n/5)=Int(n/5) And Picture1.Left
在窗体上建立一个单选按钮组Option1和一个图片框Picture1，如图所示。当选择不同的单选按钮时，图片框中填充不同的图案，请填写程序的空白处，使程序完整。 Private Sub Optionl_Click（______) Dim H,WPicture1.ClsPicturc1.PillStyle=______W=Picture1.ScaleWidth/2H=Picture1.ScaleHe
在程序代码中清除图片框Picture1 中的图形的正确语句是______ 。
假定在图片框Picture1中装入了一个图片，在程序运行中，为了清除该图片（注意，清除图片，而不是删除图片框)，应采用的正确方法是（）。
已知图片框Picture1中已装入一个图形，为了在不删除图片框的前提下，清除该图形，应采取的正确操作是（）
在窗体上画一个名称为Co mmand1的命令按钮，再画两个名称分别为Labe（）
假定在图片框picture1中装入了一个图形，为了消除该图形（注意，消除图形，而不是删除图片框），应采用的正确方法是（）
为了在运行时把当前路径下的图形文件picture file.jpg装入图片框Picture1，所使用的语句为Picture1. Picture = LoadPrcture（"picture file.jpg"）（）
将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是 【6】 。
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click（)Text1.Text="VB Programming" End Sub Private Sub Text1_Change（)Picture1.Print"VB程序设计" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是______。
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click（) Text1.Text=“VB程序设计” End Sub PrivmeSubText1_Change（) Picture1.Print"VB Programming" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内容是 【8】 。
在窗体上画一个文本框和—个图片框，然后编写如下两个事件过程： Private Sub Form_Click（) Text1.Text="VB程序设计" End Sub Private Sub Text1_Change（) Picture1.Print"VB programming" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内容是 【8】 。
在窗体上画一个文本框和—个图片框，然后编写如下两个事件过程： Private Sub Form_Click（) Text1.Text="VB程序设计" End SubPrivate Sub Textl Change（) Picture1.Print"VB programming" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内容是 【8】 。
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click（)Text1.Text="VB程序设计"End SubPrivate Sub Text1_Change（)Picture1.Print"VB programming"End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内容是 【8】 。
（ 19 ）在窗体上画两个文本框（名称分别为 text1 和 text2 ）和一个命令按钮（名称为 command1 ） , 然后编写如下事件过程：
使用微信扫一扫登录
