怎样判断windows的当前活动窗口的状态是无边框且全屏?

GetWindowLong VB声明 
Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long 
说明 
从指定窗口的结构中取得信息 
返回值 
Long，由nIndex决定。零表示出错。会设置GetLastError 
参数表 
参数 类型及说明 
hwnd Long，欲为其获取信息的窗口的句柄 
nIndex Long，欲取回的信息，可以是下述任何一个常数： 
GWL_EXSTYLE 扩展窗口样式 
GWL_STYLE 窗口样式 
GWL_WNDPROC 该窗口的窗口函数的地址 
GWL_HINSTANCE 拥有窗口的实例的句柄 
GWL_HWNDPARENT 该窗口之父的句柄。不要用SetWindowWord来改变这个值 
GWL_ID 对话框中一个子窗口的标识符 
GWL_USERDATA 含义由应用程序规定 
DWL_DLGPROC 这个窗口的对话框函数地址 
DWL_MSGRESULT 在对话框函数中处理的一条消息返回的值 
DWL_USER 含义由应用程序规定