用VB看似容易却不可能实现的？ - VB / 基础类

昨天就在这问题上研究了一整天，而且还叫上了用DELPHI的同事一起研究，但是似乎还是没实现。有高手能解决否？
问题很简单，就是去掉标题栏的图标，不是很傻的删除或者使图标透明，好了废话不多说，看图就知道了。


原图：


不是这个效果1：


不是这个效果1：


最终应该的效果：

---

VBGOOD同题讨论链接：
http://www.vbgood.com/viewthread.php?tid=92886&extra=

---

VB6里超级简单啊，设置一下即可：WhatsThisButtion--true ;WhatsThisHelp -- True ;
BoderStyle -- 3

---

引用

VB6里超级简单啊，设置一下即可：WhatsThisButtion--true ;WhatsThisHelp -- True ;
BoderStyle -- 3

“问题很简单，就是去掉标题栏的图标”，不是要加“？”按钮。

---

CreateWindowEx可以创建出来这种样式的，恩，那应该可以使用SetWindowLong更改样式。

---

发一下我昨天研究的成果，基本上能想到的方法有一下。
1.用SPY++找一个“运行框”的GWL_STYLE和GWL_EXSTYLE的值，直接写进程序里——失败。
2.用SPY++把所有GWL_STYLE里所有属性一个一个的添加到窗体内——失败。
3.SendMessage 给窗口去掉图标，发现图标透明了，但是标题栏文字还是一样不会左对齐，看起来很怪——失败。
4.获取窗口本身GWL_STYLE进行Xor异或操作——失败。

VB code:
Private Const WS_POPUP = &H80000000
Private Declare Function SetWindowLong Lib "u