Minggu, 14 Agustus 2011

Menu Pop Up dengan vb 6


Option Explicit
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 LB_GETITEMRECT = &H198 Private Const LB_ERR = (-1)
Private
Type RECT         Left As Long         Top As Long        
Right As Long         Bottom As Long End Type
Public
Function

Tidak ada komentar:

Poskan Komentar

Related Posts Plugin for WordPress, Blogger...