Tugas 1 Arif
Tugas Teknik Informasi pertama oleh Arif Widodo
Download lengkap di sini
Download lengkap di sini
Presentasi Perangkat Penyusun Komputer
Ini adalah Presentasi Microsoft Office yang disematkan, didukung oleh Office Online .
Postingan populer dari blog ini
Membuat efek pada saat form di tutup pada vb6
Buat temen-temen yang masih pengen memperdalam vb ini ada sedikit tutorial tentang bagaimana membuat efek form saat ditutup Pertama buat dulu project baru kemudian tambahkan 1 timer dan 3 command, ganti properties interval timer jadi 500. Kemudian, masing-masing command ganti caption-nya jadi "Jatuh Kesamping", "Jatuh Kebawah" dan "Efek Mengecil". Ketikan code dibawah ini : Private Sub Command1_Click() Do Me.Left = Me.Left + 2 Me.Move Me.Left + 2 DoEvents Loop Until Me.Left > Screen.Width Unload Me End Sub Private Sub Command2_Click() Do Me.Top = Me.Top + 20 Me.Move Me.Left, Me.Top DoEvents Loop Until Me.Top > Screen.Height - 500 Unload Me End Sub Private Sub Command3_Click() GotoVal = Me.Height / 2 For Gointo = 1 To GotoVal DoEvents Me.Height = Me.Height - 10 If Me.Height <= 11 Then GoTo horiz Next Gointo horiz: Me.Height = 30 GotoVal = Me.Width / 2 For Gointo = 1 To GotoVal DoEvents Me.Width = Me.Width - 10
Komentar
Posting Komentar