Membuat Form Visual Basic 6.0 Muncul Dari Tengah Monitor Ke Atas & Bawah Monitor

Membuat form muncul dari tengah ke atas & bawah monitor ini sebagai sebuah animasi saja supaya kelihatan lebih keren, cara kerjanya saat kita menjalankan program, maka form akan timbul dari tengah layar monitor dan melebar ke atas dan bawah,  untuk membuatnya cukup sederhana saja, masukkan komponen timer ke dalam form dan ubah intervalnya menjadi 10, lalu masuk pada jendela coding form dan ketikkan coding program berikut :

Private Sub Form_Load()

Me.Height = 10

End Sub

Private Sub Timer1_Timer()

Me.Height = Me.Height + 100

Tengah

If Me.Height >= 3000 Then

Timer1.Enabled = False

Tengah

End If

End Sub

Public Sub Tengah()

Me.Left = (Screen.Width - Me.Width) / 2

Me.Top = (Screen.Height - Me.Height) / 2

End SubEnd Sub

Public Sub Tengah()

Me.Left = (Screen.Width - Me.Width) / 2

Me.Top = (Screen.Height - Me.Height) / 2

End Sub

Setelah itu jalankan program (F5)…!!!