这个是改变窗口外框的控件,放上控件后,运行才效

运行后的效果

可以在窗口属性中增加阴影,效果更好(注意:是主窗口的设计属性,不是控件的)

运行效果

可以修改窗口外壳颜色已经高度

还增加2个常用的窗口按钮,已经可以设置更多小按钮
注意: 按钮ID 设置大点,不然可能被其它控件占用,发生重叠错误
MyDrawWin1.nButID(0 到 9 共10个) = 10001
MyDrawWin1.nButTxt(0 到 9 共10个) = "按钮文字"
按钮点击事件,在主窗口的事件中
Sub Form1_WM_Command(hWndForm As hWnd, hWndControl As hWnd, wNotifyCode As Long, wID As Long)
Select Case wID '命令ID,设计菜单和工具栏的设置的值。
Case 10001 ‘和 MyDrawWin1.nButID 设置的相同
Case 10002
End Select
End Sub
假如你窗口上设置了窗口菜单,运行后,菜单也会在窗口外框上面

评论一下?