Visual Basic'te Formu görev çubuğunda gizleme Taskbar

Programınızın birçok formdan oluşuyorsa bütün formların görev çubuğunda (Taskbar) dizilmesi pek hoş olmaz.Bu kod ile bu durumun üstesinden gelebilirsiniz...

 

Option Explicit
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 GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long , Byval nIndex As Long) As Long
Private Const WS_EX_APPWINDOW = &H40000
Private Const GWL_EXSTYLE= (-20)

Private Sub Command1_Click()
Dim a, b As Long
a = GetWindowLong(hwnd , GWL_EXSTYLE)
b = b And (Not WS_EX_APPWINDOW)
Hide
SetWindowLong hwnd , GWL_EXSTYLE, b
Show
End Sub


İlk yorumu siz yazın !..

  • Yorumunuz en az 30 karakter olmalıdır. (0)
İlginizi çekebilir...
Sitede Ara

  • Merhaba Ben Arda Özeren Yahya Çavuş Ortaokulu Gidiyorum 10 Sınıfım Bende Yarışma Katılmak İstiyorum Sel...
  • Açıköğretim Aöf Dönem Ücretleri 2024 - 2025 Güncel Öğretim Giderleri Tablosu
    Okumuyorum ve kayıt yenilemiyorum. Nokta....
  • Islets Oyunu Türkçe Yama (Epic ve Steam)
    Rar şifresi nedir? şifreyi belirymemişsiniz...
  • ECA Kombi Aşırı Isınma Arızası Arıza Kodu 6 Nedir Nasıl Çözülür - Pompa Çalışmıyor Olabilir Mi?
    bu hata kodu çıkıyordu kombimizde tarif ettiğiniz şekilde pompayı harekete geçirdik ve sorun çözüldü si...
  • Çiklet (Prenses) Balıklarındaki Ürkeklik ve Korkaklık
    Ben çok uzun süre sp, bp ile frenatus besledim hiç bir sorun yaşamadım. Çok uyumlulardı. Renk katıyor a...
  • Genel İşletme 1. Dönem Vize Soruları
    soru 3 yanlıs bence"...
  • CS 1.5 ve CS 1.6 İçin Sağlam Bir CFG (cengaver.cfg)
    bozuk bu cfg kullanmayın derim ...