Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0
Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0 - Hallo sahabat TUTORIAL CUY, Pada Artikel yang anda baca kali ini dengan judul Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0, kami telah mempersiapkan artikel ini dengan baik untuk anda baca dan ambil informasi didalamnya. mudah-mudahan isi postingan
Artikel VISUAL BASIC, yang kami tulis ini dapat anda pahami. baiklah, selamat membaca.
Judul : Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0
link : Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0
Silahkan ikuti langkah berikut ini :
Buka Komputer anda
Buka Aplikasi Visual Basic 6.0
Buatlah form menyerupai dibawah ini :
dan masukan Koding dibawah ini
Private Sub Form_Load()
Me.Width = 10
End Sub
Private Sub Timer1_Timer()
Me.Width = Me.Width + 100
Tengah
If Me.Width >= 4000 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 Sub
Note : Ubah interval Timer1 menjadi : 100
Run Form dan lihat hasilnya
Salam
Pintar Visual Basic | Tutorial Lengkap Visual Basic 6.0 dan Visual Basic .Net
Anda sekarang membaca artikel Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0 dengan alamat link https://tutorialcuy.blogspot.com/2019/12/muncul-melebar-kesamping-animasi-form.html
Judul : Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0
link : Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0
Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0
Pada Tutorial Visual Basic 6.0 kali masih perihal menciptakan Animasi pada Form Visual Basic 6.0 ialah Muncul Form dengan bergerak Melebar Kesamping. Jika anda telah membaca postingan kami perihal animasi melebar dari bawah, sekarang saatnya anda mempraktikan juga animasi bergerak Melebar Kesamping.Silahkan ikuti langkah berikut ini :
Buka Komputer anda
Buka Aplikasi Visual Basic 6.0
Buatlah form menyerupai dibawah ini :
dan masukan Koding dibawah ini
Private Sub Form_Load()
Me.Width = 10
End Sub
Private Sub Timer1_Timer()
Me.Width = Me.Width + 100
Tengah
If Me.Width >= 4000 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 Sub
Note : Ubah interval Timer1 menjadi : 100
Run Form dan lihat hasilnya
Salam
Pintar Visual Basic | Tutorial Lengkap Visual Basic 6.0 dan Visual Basic .Net
Demikianlah Artikel Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0
Sekianlah artikel Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0 kali ini, mudah-mudahan bisa memberi manfaat untuk anda semua. baiklah, sampai jumpa di postingan artikel lainnya.
Anda sekarang membaca artikel Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0 dengan alamat link https://tutorialcuy.blogspot.com/2019/12/muncul-melebar-kesamping-animasi-form.html
0 Response to "Muncul Melebar Kesamping - Animasi Form Visual Basic 6.0"
Posting Komentar