sebenarnya tips ini tidak terlalu penting, tapi sekedar mencoba share ilmu tentang VB aja buat sobat-sobat VB Developer yang pengen menambah koeksi aksesoris. Tips ini untuk membuat unik Form sewaktu di run atau ditampilkan, maksud Efek Vibrate ini adalah Efek Getaran jadi sewaktu form di tampilan Form akan bergetar-getar , untuk effect ini codingnya cukup mudah tidak panjang tidak capek ngetik nya, bagi yang berminat silakan ikuti langkah-langkah berikut. Persiapan yangharus kamu lakukan :
Private Sub Vibrate(frm As Form, rScale As Integer, Times As Integer)
Dim Lft As Long, Tp As Long
Dim i
Lft = frm.Left
Tp = frm.Top
For i = 1 To Times
frm.Move Lft + Sgn(rScale)
Pause 20
frm.Move Lft + rScale
Pause 20
frm.Move Lft, Tp + Sgn(rScale), frm.Width, frm.Height
Pause 20
frm.Move Lft, Tp + rScale, frm.Width, frm.Height
Pause 20
Next i
mau coding lebih lengkap Download codingnya
klik disini
Gak panjang kan, nah kalo udah selesai coba sobat jalankan (Run) atau tekan F5 , apa bener form nya bergetar-getar, selamat mencoba aja yah.
mudah-mudahan ada mamfaat nya bagi kita semua dan khusus nya bagi saya yang masi belajar VB Developer Junior semoga dapat menambah referensinya.
kumpulan tutorial dan beberapa caya yang pernah di alami saya tuangkan dan share dengan teman2 mudah2an bisa bermanpaat.
August 9, 2011
Subscribe to:
Post Comments (Atom)
Entri Populer
-
ASS , PA KABAR SOBAT BLOGGER…? gmana kabarnya…? Mudah mudahan sehat. setelah cukup lama tidak mengpost saya coba dengan sebagian kecil dari...
-
BAB I PENDAHULUAN 1.1 Latar Belakang Persaingan yang ketat di dalam dunia kerja saat ini menuntut setiap orang untuk terus mengembangk...
-
Tips kali ini masih seputar Visual Basic yaitu Membuat Caption Label Bergerak , maksudnya bisa berjalan-jalan (smoga aja gak kesasar y...
-
Nah sekarang adalah giliranya Membuat form Transparan dengan Visual Basic , disini kita menggunakan Fungsi API yaitu GetWindowLong, SetWi...
-
BAB I PENDAHULUAN 1.1 Latar Belakang Persaingan yang ketat di dalam dunia kerja saat ini menuntut setiap orang untuk terus mengemba...
-
Assalamualaikum ,pa kabar sobat blogg…? Kaliini saya akan menjelaskan cara mengatur bios komputer anda biar booting dari USB Flashdisk. I...
-
bagi yang suka sama gambar gif dan pingn membuatnya berikut paparan mengenai cara mudah membuat gambar animasi GIF. tenang aja sob Cos tidak...
-
sebenarnya tips ini tidak terlalu penting, tapi sekedar mencoba share ilmu tentang VB aja buat sobat-sobat VB Developer yang pengen menambah...
-
Sobat blog mempunyai harddisk yang kecil atau anda masih kurang dengan harddisk yang sudah sobat miliki, dan untuk membeli harganya pun masi...
-
Artikel yang panjang akan banyak memakan tempat di halaman utama sebuah blog, sehingga artikel lain yg ditulis sebelumnya akan jarang dib...
No comments:
Post a Comment