Membuat SCREENSAVER MENGGUNAKAN VB

Topik sebelumnya Topik selanjutnya Go down

Membuat SCREENSAVER MENGGUNAKAN VB

Post by Surabigaul™ on Wed Jan 09, 2008 10:26 pm

Membuat Screen Saver

Screen saver ini sangat sederhana tetapi menarik untuk dipelajari dan cukup mudah dan memberikan hasil yang memuaskan, hanya dengan mengklik form sekali akan tampil bola-bola berwarna-warni.
Langkah-langkahnya adalah :
Atur property pada form yaitu borderstyle:0 - none, windowstate=2-maximized
Kemudian masuk kedalam view code, copy paste kode ini :

Private Sub Form_KeyPress(KeyAscii As Integer)
‘untuk menutup aplikasi
Unload Me
End Sub

Private Sub Timer1_Timer()
Do
FillStyle = 0
FillColor = RGB(Int(Rnd * 255), Int(Rnd * 255), _
Int(Rnd * 255))
Circle (Int(Rnd * 12000), Int(Rnd * 10000)), Int(Rnd * 255)
DoEvents
Loop
End Sub

Surabigaul™
WEBMASTER
WEBMASTER

Male Aries Goat
Jumlah posting : 1213
Birthday : 21.03.91
Age : 26
Nama Lengkap : |>@\/1|>
Lokasi : Mochi City
Hobi : Ngaso 24 Jam
Reputation Point : 2
Forum Point : 383
Registration date : 04.08.07

About You
Short Description:

Lihat profil user http://forum.mycconline.co.cc

Kembali Ke Atas Go down

Re: Membuat SCREENSAVER MENGGUNAKAN VB

Post by Dark Fiber on Fri Jan 11, 2008 5:58 pm

Filenya harus dimasukin ke folder 'Windows' gak?

_________________
Only two things are infinite, the universe and human stupidity.
I'm not sure about the the universe though. A. Einstein.
avatar
Dark Fiber
Moderator
Moderator

Male Sagittarius Goat
Jumlah posting : 524
Birthday : 21.12.91
Age : 25
Nama Lengkap : Alfons Natanael
Lokasi : Latitude: -6.91; Longitude: 107.62
Hobi : Creative Thinking
Reputation Point : 0
Forum Point : 0
Registration date : 24.09.07

About You
Short Description:

Lihat profil user

Kembali Ke Atas Go down

Re: Membuat SCREENSAVER MENGGUNAKAN VB

Post by Dark Fiber on Fri Jan 11, 2008 5:59 pm

BTW. Bisa dipost screenshotnya gak?

_________________
Only two things are infinite, the universe and human stupidity.
I'm not sure about the the universe though. A. Einstein.
avatar
Dark Fiber
Moderator
Moderator

Male Sagittarius Goat
Jumlah posting : 524
Birthday : 21.12.91
Age : 25
Nama Lengkap : Alfons Natanael
Lokasi : Latitude: -6.91; Longitude: 107.62
Hobi : Creative Thinking
Reputation Point : 0
Forum Point : 0
Registration date : 24.09.07

About You
Short Description:

Lihat profil user

Kembali Ke Atas Go down

Nanya nih??

Post by T3ns@_Z@ng3tsu on Sat Sep 20, 2008 1:28 pm

Eh bener ga seh kalw gambar gerak di Web yang kecil - kecil bisa jadi avatar di sini??? Bisa ga??
avatar
T3ns@_Z@ng3tsu
32 Byte Member
32 Byte Member

Male Libra Monkey
Jumlah posting : 59
Birthday : 20.10.92
Age : 25
Nama Lengkap : Frendy Budiman S
Lokasi : Novus Plain
Hobi : Maen games apa aja
Reputation Point : 0
Forum Point : 0
Registration date : 10.08.08

About You
Short Description:

Lihat profil user

Kembali Ke Atas Go down

Re: Membuat SCREENSAVER MENGGUNAKAN VB

Post by h e c n y w on Sat Sep 20, 2008 8:33 pm

bisa bisa liat avatar sayya gerak2 kann???
bangga mode on on !! hohoh gag dengg . bisa kok bisa
avatar
h e c n y w
512 Byte Member
512 Byte Member

Female Capricorn Goat
Jumlah posting : 790
Birthday : 05.01.20
Age : 97
Nama Lengkap : h e c n y w
Lokasi : emperan toko
Reputation Point : 0
Forum Point : 8
Registration date : 07.08.08

About You
Short Description:

Lihat profil user

Kembali Ke Atas Go down

Re: Membuat SCREENSAVER MENGGUNAKAN VB

Post by je_kyuu on Sat Sep 20, 2008 9:38 pm

Bisa kok....Yang penting gak lebih dari 150X200 pixel aja....

_________________


Free Image Hosting at </a></div></div><div class=
avatar
je_kyuu
Administrator
Administrator

Female Aquarius Goat
Jumlah posting : 1615
Birthday : 01.02.92
Age : 25
Nama Lengkap : Jessica
Reputation Point : 0
Forum Point : 18
Registration date : 04.12.07

About You
Short Description:

Lihat profil user

Kembali Ke Atas Go down

oks

Post by T3ns@_Z@ng3tsu on Thu Oct 09, 2008 11:23 am

haha ternyata harus di coba dolo yah !! jgn nanya dolo!!! hehehe
avatar
T3ns@_Z@ng3tsu
32 Byte Member
32 Byte Member

Male Libra Monkey
Jumlah posting : 59
Birthday : 20.10.92
Age : 25
Nama Lengkap : Frendy Budiman S
Lokasi : Novus Plain
Hobi : Maen games apa aja
Reputation Point : 0
Forum Point : 0
Registration date : 10.08.08

About You
Short Description:

Lihat profil user

Kembali Ke Atas Go down

Re: Membuat SCREENSAVER MENGGUNAKAN VB

Post by Sponsored content


Sponsored content


Kembali Ke Atas Go down

Topik sebelumnya Topik selanjutnya Kembali Ke Atas


 
Permissions in this forum:
Anda tidak dapat menjawab topik