Articles by "başlıksız"
başlıksız etiketine sahip kayıtlar gösteriliyor. Tüm kayıtları göster
no image
En yeni konular, en gücel haberler. En son çıkan internet haberleri. Oyun haberleri. Hepsi webtegez.blogspot.com'da..

Bu kod sayesinden Visual Basic formunuzda formunuzun başlığı 
olmasa bile formunuzu hareket ettirebilirsiniz..
 Option Explicit
Private Declare Function ReleaseCapture Lib "user32" (] As Long
Private Declare Function SendMessage Lib "user32"Alias _
"SendMessageA" (ByVal hwnd As Long, ByVal wMsg _
As Long, ByVal wParam As Long, lParam As Any] As Long
Private Const HTCAPTION = 2
Private Const WM_NCLBUTTONDOWN = &HA1
Private Const WM_SYSCOMMAND = &H112
Private Sub label1_MouseDown(Button As Integer, Shift As _
Integer, X As Single, Y As Single]
Call ReleaseCapture
SendMessage Me.hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0&
End Sub
Private Sub Command1_Click(]
Unload Me