状态栏

Question

请问各位高手,我怎么能知道状态栏的高度啊 刚刚学习 （在线等 ！！谢谢 ）

Answer 1

是叫做任务栏吧Private Type RECT
        Left As Long
        Top As Long
        Right As Long
        Bottom As Long
End Type
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetWindowRect Lib "user32" Alias "GetWindowRect" (ByVal hwnd As Long, lpRect As RECT) As Long
  dim rectShellTray as RECT   
  dim hwnd as long
   
  hwnd  =   FindWindow("Shell_TrayWnd",   "");  
  call GetWindowRect(hwnd, rectShellTray);
  
--------------------------------------------------------------
程序，犹如人生。

Answer 2

  Dim rectShellTray As RECT
  Dim hwnd As Long
   
  hwnd  =   FindWindow("Shell_TrayWnd",   "")
  call GetWindowRect(hwnd, rectShellTray)  
--------------------------------------------------------------
程序，犹如人生。

Answer 3

Shell_TrayWnd 这个参数你从什么地方找到的
 能 用QQ 联系吗 ？
 QQ :673026364