kadirselen
Mesaj Sayısı : 550 Kayıt tarihi : 15/08/10 Yaş : 34 Nerden : Denizli Cinsiyet :
| Konu: TİTREYEN FORM YAPMA Cuma Ağus. 27, 2010 9:32 am | |
| İLK ÖNCE forma nesnelerimizi ekliyoruz... 1 Tane Timer Aşagıdaki Kodları Class'a yerleştirin...
- Kod:
-
Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Interval = 150 Timer1.Start() End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Me.Top = Me.Top + 50 Me.Top = Me.Top - 50 Me.Left = Me.Left - 50 Me.Left = Me.Top + 50 End Sub End Class
| |
|