[单选题]

在窗体上先后画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)

E.nd Sub

B.Private Sub banana _DragDrop(Source As Control,X As Single,Y As Single )

Source.Move Picture1.Left+X.Picture1.Top+Y

E.nd Sub

C.Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single )

Source.Move Picture1.Left+X.Picture1.Top+Y

E.nd Sub

D.Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single )

banana.Move banana.Left+X, banana.Top+Y

E.nd Sub

参考答案与解析:

相关试题

在窗体上先后画两个图片框,名称分别为Picture1和banana,banana

[单选题]在窗体上先后画两个图片框,名称分别为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 E

  • 查看答案
  • 在窗体上有2个图片框,名称分别为Picture1和Picture2,Pictur

    [单选题]在窗体上有2个图片框,名称分别为Picture1和Picture2,Picture2中添加了香蕉图片(见图3),且将Picture2.DragMode属性设置为1。要求程序运行时,可以用鼠标把Picture2拖拽到Picture1中(见图4)。以下可以实现此功能的事件过程是( )。

  • 查看答案
  • 确定图片框Picture1在窗体上位置的属性是(  )。

    [单选题]确定图片框Picture1在窗体上位置的属性是(  )。A.Width和HeightB.Left和TopC.Width和TopD.Height和Lef

  • 查看答案
  • 假定Picture1和Text1分别为图片框和文本框的名称,则下列错误的语句是(  )。

    [单选题]假定Picture1和Text1分别为图片框和文本框的名称,则下列错误的语句是(  )。A.Print25B.Picture1.Print25C.Te

  • 查看答案
  • 假定Picture1和Text1分别为图片框和文本框的名称,下列不正确的语句是_

    [单选题]假定Picture1和Text1分别为图片框和文本框的名称,下列不正确的语句是______。A.Print 25B.Picture1.Print 25C.Text1. Print 25D.Debug. Print 25

  • 查看答案
  • 假定Picture1和Text1分别为图片框和文本框的名称,下列不正确的语句是(

    [单选题]假定Picture1和Text1分别为图片框和文本框的名称,下列不正确的语句是()A . Print25B . Picture1.Print25C . Text1.Print25D . Text1.text=25

  • 查看答案
  • 在窗体上建立一个单选钮组Option1和一个图片框Picture1,如下图所示。

    [试题]在窗体上建立一个单选钮组Option1和一个图片框Picture1,如下图所示。当选择不同的单选钮时,图片框中填充不同的图案,请填写程序的空白处,使程序完整。Private Sub Option1_Click(______)D.im H, WPicture1.ClsPicture1.FillStyle. =______W = Picture1.ScaleWidth/2H. = Picture1.ScaleHeight/2Picture1.Circle (W, H), W/2E.nd Sub

  • 查看答案
  • (13)在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个

    [试题](13)在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2.要求程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下的标签中显示出来,请填空使程序完整。Private Sub Combo1_Click() Call ShowItem(Combo1,Label1) End SubPrivate Sub Combo2_Click() Call ShowItem(Combo2,Label2)End SubPrivate Sub

  • 查看答案
  • 在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名

    [试题]在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2,如图所示,程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空。Private Sub Combo1_Click()C.all ShowItem(Combo1, Label1)E.nd SubPrivate Sub Combo2_Click()C.all ShowItem(Combo2, Label2)E.nd SubPublic Sub Sh

  • 查看答案
  • ( 9 ) 在窗体上画 1 个命令按钮和 1 个文本框 , 其名称分别为 Com

    [试题]( 9 ) 在窗体上画 1 个命令按钮和 1 个文本框 , 其名称分别为 Command1 和 Text1 , 然后编写下列事件过程 :D.im SaveAll As StringPrivate Sub Command1_Click( )Text1.Text=Left(UCase(SaveAll),4)E.nd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)SaveAll=SaveAll+Chr(KeyAscii)E.nd Sub程序运行后,在

  • 查看答案
  • 在窗体上先后画2个图片框,名称分别为Picture1和banana,banana