求助:工具栏隐藏

zhuizhu3601 2003-11-24 11:18:52
我的一个运行程序在运行的过程中,下面的工具栏隐藏掉了,显示不出来。请教在那里进行设置,使工具栏再显示出来。谢了!
...全文
32 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
cowley 2003-11-24
  • 打赏
  • 举报
回复
用show和hide命令呀 !
aha99 2003-11-24
  • 打赏
  • 举报
回复
hehe....楼上的两种办法都好用,下次楼主再做这种东西之前先打好退路
wildleon 2003-11-24
  • 打赏
  • 举报
回复
你说的是不是任务栏?
Private Sub CmdHide_Click()
ma = FindWindow("Shell_TrayWnd", nil) '获取任务栏句柄
ShowWindow ma, SW_HIDE '隐藏任务栏
End Sub

Private Sub CmdShow_Click()
ma = FindWindow("Shell_TrayWnd", nil)
ShowWindow ma, SW_RESTORE '显示任务栏
End Sub

FindWindow ShowWindow都是api,需要声明.
lihonggen0 2003-11-24
  • 打赏
  • 举报
回复
控制面板里----任务栏和开始菜单
zhuizhu3601 2003-11-24
  • 打赏
  • 举报
回复
可能是我第一次没说明白:任务栏在别的环境中都有显示。但我做的一个工程运行后(在vb的环境下),任务栏就没了。所以并不象第一位说的那样。可能象第二位说的,可能是别人用到了,我查一下看有没有用到api。

7,732

社区成员

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

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