Code nya cukup simple dan sederhana sih .
yaitu cuku menambah kan code berikut di Form_loadnya atau di Form_Unload nya .
Untuk form bergerak keatas tambahkan code berikut :
Dan untuk membuat form bergerak ke bawah tambahkan code ini :Do
Me.Top = Me.Top - 50
Me.Move Me.Left, Me.Top
DoEvents
Loop Until Me.Top = Screen.Height
Unload Me
End
Saya punya pertanyaan, apa perbedaan code di atas ??Do
Me.Top = Me.Top + 50
Me.Move Me.Left, Me.Top
DoEvents
Loop Until Me.Top = Screen.Height
Unload Me
End
Perbedaannya adalah di Plus(+) minus(-) nya .
Perhatikan code Me.Top = Me.Top + 50 dan Me.Top = Me.Top - 50
Tidak ada komentar :
Posting Komentar