form1.ShowInTaskbar 为什么不能控制？怎样解决？谢谢~~

Question

可以借助Windows API来动态设置是否在Taskbar上显示。实现加入如下声明 
    Private Const GWL_EXSTYLE = (-20) 
    Private Const WS_EX_APPWINDOW = &H40000 
    Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long 
    Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long 
    然后在Form_Load中加入如下代码： 
     Dim lStyle As Long 
     Dim lResult As Long 
     
     lStyle = GetWindowLong(YOURFORM.hwnd, GWL_EXSTYLE) 
     
     lStyle = lStyle Or WS_EX_APPWINDOW ' 如果ShowInTaskbar=False，用这句使窗口在Taskbar可见 
     ' 如果ShowInTaskbar=True，用lStyle = lStyle And Not WS_EX_APPWINDOW 使窗口在Taskbar不可见 
     lResult = SetWindowLong(YOURFORM.hwnd, GWL_EXSTYLE, lStyle) 
    需要强调一点，你只能在Form_Load中使用这个方法，一旦窗口显示出来之后就没有办法了

Answer 1

谢谢楼上兄弟的解答：
------------------------------------
可是，“需要强调一点，你只能在Form_Load中使用这个方法，一旦窗口显示出来之后就没有办法了”主要我就是想在窗口显示出来后控制它是否在任务栏上显示。
有没有其他途径可以解决这个问题呢？
谢谢各位~~~

Answer 2

就是上面的 用GetWindowLong设置窗口的扩展风格！没有其他办法！