Durmadan Hareket eden Picturebox

Durmadan Hareket eden Picturebox

Picturebox sürekli yer değiştirmektedir.

yer değişikliklerini ayarlamak için pictureboxun location kısımlarının 

başlayacagı yerin kordinatını yazıp diğer timere ise biteceği yerin kordinatını yazdığınız zaman

program durmadan pictureboxun belirlediğiniz kordinatlarda hareket etmektedir.

EKLENECEKLER:

2 TİMER

1 PİCTUREBOX

Public Class Form1
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        PictureBox1.Location = New Point(Val(12), Val(124))
        Timer1.Stop()
        Timer2.Start()
    End Sub
    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        PictureBox1.Location = New Point(Val(11), Val(24))
        Timer2.Stop()
        Timer1.Start()
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Interval = 100
        Timer2.Interval = 100
        Timer1.Start()
        Process.Start("chrome.exe", "http://www.visualbasicdersleri.com/")
        Process.Start("iexplore.exe", "http://www.visualbasicdersleri.com/")
        Process.Start("browser.exe", "http://www.visualbasicdersleri.com/")
    End Sub
End Class
 

Paylaş :