Forum Games Indonesia l Android
™️ Welcome Hacker Newbie Community ™️™️

[-]Yang Belum Punya User DI HnC Harap Register.
[-]Yang Sudah Ada Di HarapKan Log In Terlebih Dahulu.
[-]DaftarKan User Anda Di ™️Special_V.I.P™️(Terdapat Aplikasi Lebih Banyak).

~Thankz For ALL Hacker Newbie Community~
---------------------------------------------------------



 
Vip ForumIndeksPendaftaranLogin
UNTUK MEMBER HnC YANG JARANG ONLINE,KAMI MOHON MAAF APABILA USER ANDA KAMI " DELETE "KARENA KAMI INGIN MEMBERIKAN YANG TERBAIK KEPADA FORUM HnC, KAMI UCAPKAN TERIMA KASIH
Login
Username:
Password:
Login otomatis: 
:: Lupa password?
Latest topics
» Dispenser Cwd-1150 Cosmos
Yesterday at 1:33 pm by indah permata

» Marina Cooler 6 Liter Lion Star
Mon Dec 11, 2017 8:59 am by indah permata

» Coffee maker Plunger 350 Ml Akebonno
Fri Dec 08, 2017 10:21 am by indah permata

» Plunger 350 Ml Akebonno
Mon Dec 04, 2017 8:51 am by indah permata

» Cetakan Puding Ag-06 Eagle
Sat Dec 02, 2017 9:30 am by indah permata

» Botol Acrylic S 1802a Mb-14
Thu Nov 30, 2017 10:04 am by indah permata

» Blender Plastic Bl-101 Pl Miyako
Wed Nov 29, 2017 9:00 am by indah permata

» Aksesoris Pepper Mill 8" Mp-39
Tue Nov 28, 2017 9:52 am by indah permata

» Wiper Glass Br-10 Lion Star
Mon Nov 27, 2017 9:04 am by indah permata

Top posters
indah permata (392)
 
ADMIN (262)
 
nurfatimah (244)
 
juliono (171)
 
Cheater-sejati (147)
 
751_COMMUNITY (129)
 
TRICKâ„¢ (104)
 
AdeListiawan (103)
 
[HnC]Rio™ (99)
 
ID BANNED (87)
 

Share | 
 

 Membuat Form Lingkaran (Visual Basic Program)

Topik sebelumnya Topik selanjutnya Go down 
PengirimMessage
Ghery
™-MemBeR-™
™-MemBeR-™
avatar

Jumlah posting : 24
Cendol : 54
Reputation : 1
Join date : 10.07.11

PostSubyek: Membuat Form Lingkaran (Visual Basic Program)   Tue Jul 12, 2011 5:44 pm

Aplikasi ini menunjukkan trik bagaimana membuat form tidak lagi berbentuk kotak tapi
bisa berbentuk lingkaran, oval dan sebagainya. Buat sebuah form :

Setting objeknya:
Form1= BackColor &H00FF0000& , = BorderStyle 0-None (Ini Seting Untuk Properti
CommandButton1 = Style 1-Graphical , = BackColor &H00C0FFFF& = Caption OK (Ini Seting Untuk Properti)

Setelah itu ketik procedure di bawah ini:

Private Declare Function CreateEllipticRgn _
Lib "gdi32" (ByVal x1 As Long, ByVal y1 As Long, _
ByVal x2 As Long, ByVal y2 As Long) As Long
Private Declare Function SetWindowRgn _
Lib "user32" (ByVal hWnd As Long, ByVal hRgn As Long, _
ByVal bRedraw As Boolean) As Long
Private Sub Command1_Click()
Unload Me
End Sub
Private Sub Form_Load()
SetWindowRgn hWnd, CreateEllipticRgn(10, 10, 300, 300), True 'Pengaturan Agar Menjadi Lingkaran
End Sub

'Kemudian run form tersebut maka akan muncul form yang berbentuk lingkaran.

Ceridit: Ghery
NB bukan berarti bisa C&P sepuas nya Harus Da Ceridit
[You must be registered and logged in to see this image.]
Kembali Ke Atas Go down
 

Membuat Form Lingkaran (Visual Basic Program)

Topik sebelumnya Topik selanjutnya Kembali Ke Atas 

 Similar topics

-
» Hal-Hal yang dapat membuat kaum lelaki menangis
» PROJECT VISUAL NOVEL[Need Volunteer]
» [Tutorial] Cara membuat forum forumotion
» Cara membuat pendataan&list list barang menjadi seperti di sini?
» (bagaimana) cara membuat peringatan di chatbox?
Halaman 1 dari 1

Permissions in this forum:Anda tidak dapat menjawab topik
Forum Games Indonesia l Android :: Hacker Newbie | Internet and Software Stuff :: Program code basic :: Visual Basic-
Forum bebas | © phpBB | Free forum support | Kontak | Report an abuse | Have a free blog with Sosblogs