Tutorial Membuat Efek Menarik Saat Form di Close Menggunakan VB 6.0

Ditulis olehMC Project -
Artikel Terkait Tutorial VB6
Cara Membuat Efek Menarik Saat Form di Close dengan VB6 - Pada pertemuan kali ini Tip dan Trik Visual Basic ingin membagikan Tip bagaimana membuat efek form pada saat di Close.
Dengan menggunakan kode-kode tertentu pada saat form di close akan ada efek yang muncul yang sangat menarik sehingga terlihat istimewa, salah satu di antaranya adalah form bergerak kesamping seperti sebuah pergerakan kereta yang lama-kelamaan akan menghilang dan masih banyak lagi,nanti kita kan membahasnya satu per satu. 

Form yang menghilang pada saat tombol close di klik adalah sesuatu yang biasa.Jika Anda ingin membuat kagum pengguna program dengan memberikan efek yang tidak biasa pada saat keluar dari form, silakan Anda pelajari tip berikut ini.
Dengan menuliskan kode-kode yang tidak terlalu panjang, Anda bisa memberikan efek-efek yang menarik pada saat tombol close di klik, antara lain :
  1. Form bergerak kesamping kemudian menghilang, atau
  2. Form jatuh kebawah kemudian menghilang, atau
  3. Form semakin mengecil kemudian menghilang
Dari ketiga efek form diatas kita akan membahasnya satu peresatu.Silahkan Anda memilih yang paling menarik diantara ketiga efek tersebut kemudian ikutilah langkah-langkah pembuatannya berikut ini :

Membuat Efek Form pada saat Form di Close dengan VB6.

1. Buka Form Visual Basic 6.0 Anda
2. Kemudian Anda buka jendela kode dengan F7
3. Setelah Anda masuk ke jendela kode perhatikan bagian paling atas dari jendela tersebut.Bagian 
   yang didalamnya terdapat tulisan Form adalah bagian object dan yang terdapat tulisan Load     
   adalah     bagian Procedure.Sekarang silakan Anda klik bagian Procedure, kemudian pilih    
   Unload.Untuk       lebih jelasnya lihat kode dibawah ini :

Private Sub Form_Unload (Cancel As Integer)

4. Selanjutnya Anda harus menuliskan kode yang sesuai dengan efek yang Anda inginkan, kemudian 
    ketik kode dibawah ini dibagian kode Private Sub Form_Unload (Cancel As Integer) :

Jika Anda menginginkan Form bergerak ke samping kemudian menghilang, ketik kode berikut dibawah ini :

Do
Me.Left=Me.Left + 40
Me.Move Me.Left, Me.Top
DoEvents
Loop Until Me.Left >Screen.Width

Jika Anda menginginkan form jatuh kebawah kemudian menghilang, ketik kode berikut dibawah ini :

Do
Me.Top=Me.Top + 20
Me.Move Me.Left, Me.Top
DoEvents
Loop Until Me.Top >Screen.Height-500

Dan jika Anda inginkan adalah efek yang terakhir, yaitu form mengecil kemudian menghilang, ketik kode berikut dibawah ini:

Do
Form1.Height=Form1.Height-10
Form1.Width=Form1.Width-10
Loop Until Form1.Height=405 And Form1.Width=1680
Unload me

Kode-kode diatas bisa Anda tambahkan pada program-program Anda yang sudah jadi.

Demikian tip cara Cara Membuat Efek Menarik Saat Form di Close dengan VB6, Semoga bermanfaat buat kita semua.Selamat mencoba, semoga sukses berhasil.


Selain Sebagai Penyedia Panduan Belajar Database dan Tutorial Pemrograman, Kami Juga Membagikan Kumpulan Source Code Program Aplikasi dan Ebook Pemrograman Terlengkap yang Bisa Anda Dapatkan Secara Gratis di Halaman :


Rekomendasi Web Hosting
  1. 20rb perbulan. Diskon hingga 40% kode kupon: MCP Daftar disini (apache).
  2. 10rb perbulan. Diskon hingga 75% kode kupon: MCP Daftar disini (litespeed).
  3. 10rb perbulan. Diskon hingga 70% kode kupon: aff-MCP Daftar disini (apache).
Tag