Pelota que rebota

[dopito]

Hola, he estado mirado codigos para hacer que una imagen (pelota) rebote por un formulario, tengo esto:

Option Explicit
Dim Arriba As Boolean
Dim Derecha As Boolean
Const Incremento = 50

Private Sub Form_Load()
Arriba = False
Derecha = False
End Sub

Private Sub Timer1_Timer()
If (((Imagen1.Left + Imagen1.Width) + Incremento) > Me.Width) Then
Derecha = Not Derecha
End If

If (Imagen1.Left - Incremento < 0) And Derecha = False Then
Derecha = True
End If

If (((Imagen1.Top + Imagen1.Height) + Incremento) > Me.Height) Then
Arriba = Not Arriba
End If

If (Imagen1.Top - Incremento < 0) And Arriba = False Then
Arriba = True
End If


Imagen1.Move IIf(Derecha = True, Imagen1.Left + Incremento, Imagen1.Left - Incremento), IIf(Arriba = True, Imagen1.Top + Incremento, Imagen1.Top - Incremento)
Me.Caption = Imagen1.Left & ", " & Imagen1.Top
End Sub
---------------------

pero me da un error: en Imagen1.Move
Pone: Error 1 'Public Event Move(sender As Object, e As System.EventArgs)' es un evento y no se puede llamar directamente. Utilice la instrucción RaiseEvent para provocar un evento


Alguien podria decirme de que va eso?
Muchas Gracias!

[seba123neo]

Hola, estas trantando de usar un codigo de visual basic 6 en .NET, si lo haces andar asi nomas sin cambiar nada, sos genio...hombre no lo podes usar asi nomas , tenes que pasarlo a .NET y no es dificil...

saludos.

[dopito]

No me podrias decir a que equivale eso en .NET?
O hay que modificar todo el codigo y cuesta mucho?

No tengo demasiada idea de lo que quiere decir

Gracias

[Fueguino]

El metodo Move de image1 deberia tener los arguments entre parentesis.... es un error gramatico de programacion eso...