怎么能够去掉系统菜单和图标

小王 2003-12-04 01:55:28
怎么能够去掉系统菜单和图标
...全文
29 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
abcd110948 2003-12-04
  • 打赏
  • 举报
回复
minbutton & maxbutton =false
lxcc 2003-12-04
  • 打赏
  • 举报
回复
up
kmzs 2003-12-04
  • 打赏
  • 举报
回复
minbutton & maxbutton =false
小王 2003-12-04
  • 打赏
  • 举报
回复
To lxcc(虫子)
我只想要controlbox中的关闭按钮其他的去掉.
lxcc 2003-12-04
  • 打赏
  • 举报
回复
form的属性设置controlbox=false
小王 2003-12-04
  • 打赏
  • 举报
回复
To Rick110AAA
系统菜单现在没有了,图标有什么方法能去掉呢?
海牛 2003-12-04
  • 打赏
  • 举报
回复
试试!!^_^

Private Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long

Private Sub Form_Load()
Dim lM As Long

lM = GetSystemMenu(Me.hwnd, 0)

Call DeleteMenu(lM, 0, &H400)
Call DeleteMenu(lM, 0, &H400)
Call DeleteMenu(lM, 0, &H400)
Call DeleteMenu(lM, 0, &H400)
Call DeleteMenu(lM, 0, &H400)
Call DeleteMenu(lM, 0, &H400)
Call DeleteMenu(lM, 0, &H400)
End Sub
海牛 2003-12-04
  • 打赏
  • 举报
回复
1、置窗体的属性BorderStyle=0
2、使用API函数。

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧