Visual Basic 6 ile Transparent form
Formunuzu Transparent hale getirerek hoş bir görünümde olmasını sağlayın |
Formunuzu Transparent Hale Getirmek
Formunuza bir modül ekleyin ve aşağıda ki kodu içine ekleyin
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long 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 Const GWL_EXSTYLE = (-20) Public Function MakeTransparent(ByVal hwnd As Long, Perc As Integer) As Long |
Formunuza bir tane HScroll Bar ekleyin ve aşağıda ki kodu forma yazın
Private Sub Form_Load() HScroll1.Min = 50 HScroll1.Max = 255 HScroll1.Value = 50 End Sub Private Sub HScroll1_Change() |
Paşa YAZICI
Marmara Üniversitesi Bilgisayar ve Elektronik Bölümü Sitesi / Bilgironik
TD Software
Son yorumlar