用me.hide隐藏窗口以后怎样通过热键让它再显示出来啊
就是一直监视键盘的动作
请各位高手指教
就是一直监视键盘的动作
请各位高手指教
解决方案 »
- mshflexgrid中,如何将最后两列的最后四行左右合并
- 一个类型匹配问题
- MSFlexGrid 如何高亮显示所在行
- 我用MSHFlexGrid控件和一个text文本控件实现数据的输入和修改,为什么当输入字符时是左对齐,当输入数字时是右对齐呢?
- 如何让程序在中间暂停?
- 请教vbscript是否有 sleep()函数或相关功能的函数
- 求助,picturebox加入一张15MB,20000*17000象素的图片提示 内存溢出,如何解决啊
- DTPicker没法加
- 怎么样临听某个端口?
- 全套大型ERP软件源码出售,完整的设计开发文档,数据库设计文档,安装程序,帮助文件
- [出售]VB成型网络软件源码!!!
- 如何将: BMP 转换 GIF .
查一查以前的帖子,看看别人是怎么样使用全局热键才行!学习!!!!!!!
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Const SW_SHOWNORMAL = 5
Const SW_HIDE = 1
Dim Ret As String
'Ask for a Window title
Ret = "故障报警"
'Search the window
WinWnd = FindWindow(vbNullString, Ret)
'Show the window
If show_hide = True Then
mnuwarnhide.Caption = "隐藏告警管理"
ShowWindow WinWnd, SW_SHOWNORMAL
Else
mnuwarnhide.Caption = "显示告警管理"
ShowWindow WinWnd, 0
End If
百分百没问题