窗体中有图片框(Picturel)和计时器(Timerl)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。请填空。Private Sub Form_Load()Picturel.Picture=LoadPicture("c:\My Documents\图片\Qianl_Icon02.ico")______End SubPrivate Sub Timer1_Timer()Static x,y As Integerx=x+300y=y

题目

窗体中有图片框(Picturel)和计时器(Timerl)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。

请填空。

Private Sub Form_Load()

Picturel.Picture=LoadPicture("c:\My Documents\图片\Qianl_Icon02.ico")

______

End Sub

Private Sub Timer1_Timer()

Static x,y As Integer

x=x+300

y=y+300

Picturel.Move x,y

End Sub


相似考题
更多“ 窗体中有图片框(Picturel)和计时器(Timerl)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。请填空。Private Sub”相关问题
  • 第1题:

    窗体中有图片框(Pieture1)和计时器(Timer1)两个控件。运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下角移动,每次向左,向右移动100twip。请填空。

    Private Sub Form_ Load()

    Picture1_icture=LoadPicture(“c:\pic\mouth.ico”)

    【 】.Interval=2000

    End Sub

    Private Sub Timer1_ Timer()

    Static x,y As Integer

    x=x+100

    y=y+100

    Pictuer1.Move [x, y]

    End Sub


    正确答案:Timerl
    Timerl

  • 第2题:

    在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:

    Private Sub Form_Click()

    Textl.Text="VB程序设计"

    End Sub

    Private Sub Textl_Change()

    Picturel.Print"VB programming"

    End Sub

    程序运行后,单击窗体,则在文本框中显示的内容是【 】,而在图片框中显示的内容是【 】。


    正确答案:VB程序设计VB programming
    VB程序设计,VB programming 解析:文本框内容是因窗体的dlink事件而改变,而PictureBox内容是因文本框内容的改变而改变的。

  • 第3题:

    窗体中有图片框(Picture1)和计时器(Timer1)两个控件,运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下角移动,每次向左、向右移动100单位。请在[ ]填空:
    load;Interval;move

  • 第4题:

    窗体上有一个图片控件和一个按钮控件,下列程序执行的结果是( )。 Private Sub Commandl_Click() Picturel.Picture=LoadPicture("c:\picture.jpg") Picmrel.Cls Picturel.Print "picture" End Sub

    A.窗体无显示,图片框显示图片和文字picture

    B.窗体上出现picture文本,图片框无显示

    C.窗体上出现picture文本,图片框显示图片picture.jpg

    D.窗体无显示,图片框只显示picture文字


    正确答案:A
    解析:图片框的装载语句为:Picturel.Picture=LoadPicture(图片完整路进)。Print输出方法的功能是在指定的对象上输出文本信息,它的基本格式为:对象名.Print。

  • 第5题:

    设窗体上有图片框Picture1和计时器Timer1两个控件,运行程序时,将图片加载到图片框中,然后图片框以每5秒钟一次的速度向窗体的右下方移动,每次向右、向下移动100。请补充程序中的空白处。
    ①Timer1
    ②Static x,y As Integer
    ③x,y