|
|
|
Click here to copy the following block | Private Type RECT Left As Long Top As Long Right As Long Bottom As Long End Type
Private Declare Function GetWindowRect Lib "user32" (ByVal hWnd As Long, _ lpRect As RECT) As Long
Sub GetWindowSize(ByVal hWnd As Long, Width As Long, Height As Long) Dim rc As RECT GetWindowRect hWnd, rc Width = rc.Right - rc.Left Height = rc.Bottom - rc.Top End Sub |
|
|
|
Submitted By :
Nayan Patel
(Member Since : 5/26/2004 12:23:06 PM)
|
|
|
Job Description :
He is the moderator of this site and currently working as an independent consultant. He works with VB.net/ASP.net, SQL Server and other MS technologies. He is MCSD.net, MCDBA and MCSE. In his free time he likes to watch funny movies and doing oil painting. |
View all (893) submissions by this author
(Birth Date : 7/14/1981 ) |
|
|