Simpatie.ro - matrimoniale
EliteHackers
SALUT 2022!! NE-AM MUTAT PE DISCORD ! Vrei să inviți un prieten? [T]eoria [H]aosului [C]ontrolat - https://discord.com/invite/U4HBCHzm7r Acesta aste link-ul oficial al acestui server.
Nou pe simpatie:
Sophya
Femeie
25 ani
Bucuresti
cauta Barbat
25 - 54 ani
EliteHackersReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
EliteHackers / Programare / [VB6] Semi-Transparent Form Pagini: 1 Moderat de Ad_Infinitum, AntiKiler, Puscas_marin, r3v
#1
Puscas_marin
Moderator
Postari: 315
Add To Declarations:

Code:

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 crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long

This should be your Form_Load:

Code:

Private Sub Form_Load()
    SetWindowLong Me.hWnd, (-20), &H80000
    SetLayeredWindowAttributes Me.hWnd, 0, 200, &H2
End Sub



_______________________________________
Deci asa se fac banii....da clik sa vezi

 
   
Pagini: 1  
Mergi la