Program Visual Basic: Membuat Crazy Form, Form Menjadi bergerak dan berubah bentuk..!

Iseng-iseng search http://www.planet-source-code.com/ akhirnya nemu juga program yang lumayan asik buat di jadiin hiburan, namanya Crazy Form.
Program ini simple banget, saat di jalanin maka form akan berubah bentuk dan tempat, kalau di lihat orang pasti di kira kamputer kita lagi kena virus hehehehe.

Kalau tertarik, download programnya di sini

atau pengen tau cara buatnya?? terus lanjut baca posting ini sampai abis :D

Cara membuatnya:
1. Buka program visual Basic-
2. Buat form seperti di bawah ini

kreasi sesuka anda.

3. Tambahkan timer di form, seperti di bawah ini


4. Kita setting properties timer, ubah timer dari 0 menjadi 1000


5. Klik 2 kali timer trus copy paste coding di bawah ini:
Private Sub Timer1_Timer()
Dim Height As String
Dim Width As String
Dim Top As String
Dim Left As String
Randomize
Height = Int(Rnd * 10000)
Width = Int(Rnd * 10000)
Top = Int(Rnd * Screen.Height)
Left = Int(Rnd * Screen.Width)
Form1.Height = Height
Form1.Width = Width
Form1.Top = Top
Form1.Left = Left
End Sub


seperti di bawah ini:

Labels: