Wednesday 3 February 2010

Membuat Form Transparan


http://erge32.blogspot.com Tips kali ini adalah bagaimana Membuat Form Transparant dengan Visual Basic, disini kita menggunakan Fungsi API yaitu GetWindowLong, SetWindowLong dan SetLayeredWindowAttributes. Saya rasa tidak perlu penjelasan yang detail untuk hal ini sobat bisa langsung melihat penampakannya dibawah ini

Bagaimana dengan Codingnya ikuti Langkah - Langkah Berikut :


  • Buat Project Baru Standart Exe
Ketik Coding dibawah ini pada Form Project Sobat

Option Explicit

Private Const WS_EX_LAYERED = &H80000
Private Const GWL_EXSTYLE = (-20)
Private Const LWA_COLORKEY = &H1
Private Const LWA_ALPHA = &H2

Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crColor As Long, ByVal nAlpha As Byte, ByVal dwFlags As Long) As Long

Private Sub Form_Load()
Call SetWindowLong(Me.hwnd, GWL_EXSTYLE, GetWindowLong(Me.hwnd, GWL_EXSTYLE) Or WS_EX_LAYERED)
Call SetLayeredWindowAttributes(Me.hwnd, RGB(255, 0, 255), 128, LWA_ALPHA Or LWA_COLORKEY)
End Sub


Untuk ketajaman transparant sobat bisa menggati Angka - Angka yang berwarna merah dengan angka yang lain (maximal value 255). Mudah - mudahan ada mamfaatnya selamat mencoba ... salam

26 Komentar: Membuat Form Transparan


Tukang Service on 3 February 2010 at 07:08 said...

Wah boleh di coba nih Kang, emang bener2 seorang Master jadi tetep aja banyak inspirasi... sukseslah buat Kang Guanteng.

Terima Kasih Sob Tukang Service Atas Komentarnya.
Muhammad Chandra on 3 February 2010 at 07:23 said...

bang erge ,, minta software VB nya donk. .

Terima Kasih Sob Muhammad Chandra Atas Komentarnya.
eRGe on 3 February 2010 at 07:33 said...

@Tukang Service ... Makasih Mas Centil

@Muhammad Candra ... Kalo berhasil saya upload akan saya titip link nya di blog ini mas

Muhammad Chandra on 3 February 2010 at 07:40 said...

mas erge ,, kek mana cara buat kyk mas erge tu ,, ada penanda warna merah'a klu mas erge berkomentar. .

Terima Kasih Sob Muhammad Chandra Atas Komentarnya.
Wandhe Fadilah on 3 February 2010 at 07:41 said...

pengen belajar visual basic donk

Terima Kasih Sob Wandhe Fadilah Atas Komentarnya.
Ngeposting ni yee on 3 February 2010 at 08:18 said...

thanKs iNfonya sOb,,
sangat bermanfaat ni,,

Terima Kasih Sob Ngeposting ni yee Atas Komentarnya.
kie on 3 February 2010 at 16:15 said...

lagi pengen belajar VB jadi blom ngerti sampe kesini...tapi tanks tutornya saya coba deh moga-moga bisa :)

Terima Kasih Sob kie Atas Komentarnya.
HAPIA Mesir on 3 February 2010 at 16:22 said...

wah yang ni bagiannya pawang visual basic....hehehehe

Terima Kasih Sob HAPIA Mesir Atas Komentarnya.
Artikel Agama on 3 February 2010 at 16:24 said...

mantab mantab mantab. ane dulu sempat belajar visual basic. tapi lupa sob.

Terima Kasih Sob Artikel Agama Atas Komentarnya.
Miss Gadget on 4 February 2010 at 05:11 said...

Info yang sangat bermanfaat sekali.. mohon izin untuk dicopy scriptnya... thanks before.

Terima Kasih Sob Miss Gadget Atas Komentarnya.
Blogger on 4 February 2010 at 11:10 said...

wah ada mantra baru rupanya, sob ne support VB.6.0 atau versi selanjutnya...
mo coba ngtes dlu dech...mudah2an manjur hehe..

Terima Kasih Sob Blogger Atas Komentarnya.
Eri Subakti on 4 February 2010 at 15:45 said...

waduh jadi pengen belajar visual basic nie kang....

Terima Kasih Sob Eri Subakti Atas Komentarnya.
mas bayu on 4 February 2010 at 16:49 said...

bagus artikelnya sob, thanks ya

Terima Kasih Sob mas bayu Atas Komentarnya.
the chronicle on 4 February 2010 at 16:51 said...

haduh Erge, gak ngerti aku yang begituan puyeng wkwkwkkw
Thank infonya anyway

Terima Kasih Sob the chronicle Atas Komentarnya.
eRGe on 5 February 2010 at 14:55 said...

@All .. Makasih atas komen-komen nya sob

Pemula SEO on 21 February 2010 at 04:24 said...

form kok tidak keliahatan.Bagaimana caranya orang untuk memakai form tersebut.

Terima Kasih Sob Pemula SEO Atas Komentarnya.
Rinto on 3 May 2010 at 09:18 said...

wow...mangstab memang sobat yg satu ini.....tips2 ga pnh ada matinye

Terima Kasih Sob Rinto Atas Komentarnya.
Nursing Certification on 3 May 2010 at 09:22 said...

mangstab mangstab mangstab. ane dulu jg sempat belajar visual basic. tapi dah lupa sob

Terima Kasih Sob Nursing Certification Atas Komentarnya.
Finance Tips on 3 May 2010 at 09:24 said...

wah..keren...ane ga mudeng soal ginian,...ane cuman bisa posting soal Finance Tips...itu jg dr sumber lain...re-post gituuu

Terima Kasih Sob Finance Tips Atas Komentarnya.
Auto News on 3 May 2010 at 09:26 said...

nice to be here....inget kata itu ga Gan...ne blog ane yg baru

Terima Kasih Sob Auto News Atas Komentarnya.
Anonymous said...

yusri....
thax atas materinya.. tmbh lgi dunks biar mkin bnyak yg bsa dplajari

Terima Kasih Sob Anonymous Atas Komentarnya.
Anonymous said...

kk login ma pas nya apa send email ya ubay_51cool@yahoo.com

Terima Kasih Sob Anonymous Atas Komentarnya.
Informasi komputer, internet, gadget, blogging, software dan teknologi informasi lainnya on 26 December 2010 at 07:23 said...

wah makasih atas sharenya, ini yang sy cari, makasih banyak yah

Terima Kasih Sob Informasi komputer, internet, gadget, blogging, software dan teknologi informasi lainnya Atas Komentarnya.
Agus Saputra on 9 September 2011 at 01:55 said...

Ajarin DOnk !!

Terima Kasih Sob Agus Saputra Atas Komentarnya.
sayyed ahmad assagaf on 26 September 2011 at 18:36 said...

berguna bang thanks

Terima Kasih Sob sayyed ahmad assagaf Atas Komentarnya.
REO said...

THANK`S

Terima Kasih Sob REO Atas Komentarnya.

Tanggapan Sobat

Zona Bebas Komentar tapi jangan nyepam.

Kalo nyepam minta maaf nih, dengan terpaksa dilaporkan pada kantor polisi terdekat dihapus, monggo sobat silakan komentar jangan malu-malu.

ABOUT ME

Empu Blog ini

SUPPORT BLOG INI




Submit

Display Pagerank Yahoo bot last visit powered by MyPagerank.Net

IKUTI VIA EMAIL

Enter your email address:

Delivered by FeedBurner

My Blog Do Follow

5 Komentar Terbaru