Effect Form Dan Kontrol Komponen Form membuka dari kiri ke kanan Animasi ini untuk membuka form mulai dari kiri ke kanan ketika program dijalankan. Buatlah rancangan form dibawah ini : Isi interval Timer1 dengan :1 masukkan listing program seperti berikut pada form : Private Sub Timer1_Timer() Me.Width = Me.Width + 20 If Me.Width >= 9000 Then Timer1.Enabled = False End If End Sub maka yang terjadi form akan perlahan terbuka dari kiri kekanan , kecepatannya tergantung +20 jika lebih besar angkanya kecepatannya pun makin cepat , dan lebar form 9000 . Text Muncul Berjalan Pada form ini, kita akan membuat animasi text berjalan. Caranya kita rancang dulu form dibawah ini kemudian ikuti langkah-langkah selanjutnya : masukkan listing program seperti berikut pada form : Dim Strl As String Dim i Private Sub Form_Load() Strl = "SELAMAT DATANG DI FAJARYUSUF.COM" i = 0 End Sub Private Sub Timer1_Timer() Timer1.Interval = 100 i = i + 1 Label1 ...
Website Pembelajaran Pemrograman dan Info Game Terupdate