请教一个关于显示图标的问题！

Question

我将窗体的caption的字符删除，然后将controlBox属性设为false
这样就可以实现无标题栏的效果，但是下面的按纽就没有文字和图标了，
我用SetWindowsText可以为窗体设置文字，但是怎么能让图标显示出来呢？

Answer 1

Controlbox设置为False
Caption设置为一个空格
这样你的窗体的Icon又出来了.

Answer 2

不行啊！是不是我做错了，能具体些吗？怎么设置Caption为一个空格
me.Caption=" "？ 这样标题拦也出来了啊

Answer 3

标题和图标都不用为空. 用API  Private Declare Function GetWindowLong& Lib "user32" _
      Alias "GetWindowLongA" (ByVal hWnd&, ByVal nIndex&)
  Private Declare Function SetWindowLong& Lib "user32" _
      Alias "SetWindowLongA" (ByVal hWnd&, ByVal nIndex&, _
      ByVal dwNewLong&)  Private Const GWL_STYLE As Long = (-16&)
  Private Const WS_BORDER = &H800000Public Sub Install(frm As Form)  Call SetWindowLong(frm.hWnd, GWL_STYLE, GetWindowLong(frm.hWnd, GWL_STYLE) Xor _
                                (WS_BORDER))                           
    
End Sub