Thursday, April 11, 2013

Cara Membuat Animasi Penutup Form Pada Visual Basic

Beberapa postingan saya yang lalu selalu membahas tentang visual basic apalagi saya sedang senang-senangnya bermain-main dengan visual basic, kali ini saya akan memberikan tutorial cara membuat animasi saat kalian menutup suatu form atau jendela pada aplikasi yang kalian buat, terlihat keren kan? penasaran?

Kalau begitu langsung saja di terapkan ya.. ikuti tutorial berikut dengan baik :

#1 : Langkah awal silahkan masukkan buat satu buah Button dengan Nama command1 atau bisa kalian sesuaikan sendiri, contoh nama tombol yang saya buat yaitu command1

#2 : Kemudian tab pada bagian coding atau klik 2 kali pada sembarang form kosong dan pilih menu GENERAL kemudian langsung saja pastekan kode yang berwarna merah di bawah ini:

Private Sub Command1_Click()
ExitLayout
Unload Me
End Sub

Private Sub ExitLayout()

On Error Resume Next
Dim fHeight As Long
Dim fWidth As Long

For fHeight = Me.Height To 1000 Step -1

Me.Height = fHeight
'Move (Screen.Width - Width) / 2, (Screen.Height - Height) / 3
Next fHeight

If Me.Height = 1000 Then

For fWidth = Me.Width To 1000 Step -2
Me.Width = fWidth
Next fWidth
End If
Me.Refresh
End Sub

Catatan : Ubah kode berwarna biru dengan nama tombol atau objek lainnya yang sudah kalian buat fungsi kode ini adalah untuk mengeksekusi animasi saat menutup form.

Jika sudah selesai langsung saja tekan tombol F5 dan test apakah animasi penutupnya berjalan dengan baik, oke sekian dulu postingan singkat kali ini jika kalian masih bingung jangan segan untuk meninggalkan pertanyaan kalian pada kolom komentar di bawah, semoga artikel ini dapat bermanfaat dan Terima Kasih!

1 comment


EmoticonEmoticon