如何将EXCEL或者任意一个窗口永远保持显示在桌面最上层?

如何将EXCEL或者任意一个窗口永远保持显示在桌面最上层?,第1张

具体 *** 作方法如下:

1、以Excel2007为例,打开VBA编辑器,按住ALT+F11按钮,进入VBA编辑器。

2、点击菜单栏的“插入”,在下拉选框中选择“模块”,d出代码窗口


3、在d出的代码窗口中粘贴下列代码:Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, _   ByVal hwndInsertAfter As Long, ByVal x As Long, ByVal y As Long, _   ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Const HWND_TOPMOST = -1Const HWND_NOTOPMOST = -2Const SWP_NOSIZE = &H1Const SWP_NOMOVE = &H2

Sub 窗口总在最前面()SetWindowPos Applicationhwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE Or SWP_NOMOVEEnd SubSub 恢复()SetWindowPos Applicationhwnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOSIZE Or SWP_NOMOVEEnd Sub

4、关闭VBA编辑器,在EXCEL工作界面中按快捷键ALT+F8,d出宏窗口。选择“窗口总在最前”,然后点击“执行”。这样,EXCEL的窗口就会一直保持在最前面了

5、如果不想EXCEL窗口保持在最前,那就按上一步 *** 作,选择“恢复”,点击“执行”,这样窗口就不会在最前面了。

这样的问题,我以前也有过这样的想法,后来在网上打了好久才找到一个小型软件只是几百KB大小,叫:前台小精灵。。。你可以去下载试试看。在这里我还想说一个点就是,关于WINDOWS窗口在最前面的话,这和软件设计有关系的,是一个叫TopMost的类

您好,您说的是悬浮窗吗?您可以设置具体的应用程序是否显示悬浮窗口,请根据您手机的系统版本,进入具体路径 *** 作开启或者关闭:
1、ColorOS7及以上版本:进入「设置>应用管理>悬浮窗管理」,设置具体的应用程序是否显示悬浮窗口。
2、ColorOS6-61版本:进入「设置>应用管理>选择一个应用并点击>找到允许显示悬浮窗」,开启或关闭。
3、ColorOS50-521版本:进入「设置>安全>悬浮窗管理」,设置具体的应用程序是否显示悬浮窗口。

我们已经看到了一些应用程序,无论该活动窗口是否保持窗口之上,常见的Microsoft Word文档打开,编辑搜索窗口就是这样。在VB开发通过调用SetWindowsPos()API函数来实现这个功能。该函数的声明如下:
私人声明函数SetWindowPos
解放“USER32”(BYVAL HWND长,_
BYVAL hWndInsertAfter长,BYVAL
X作为长,BYVAL y为龙,_
BYVAL CX长,BYVAL CY一样长,
BYVAL wFlags长),只要
----的hWnd参数是窗口的句柄; X,窗口的左上角的y坐标,CX,CY是窗口宽度和高度; hWndInsertAfter参数列表的hWnd窗口在窗口句柄的窗前,有四个可能的值:
可选的串行值
1 HWND_BOTTOM的作用在窗口列表
2 HWND_TOP在上列表
3 HWND_TOPMOST在窗口顶部的字符序列窗口的窗口底部的窗口列表窗口
4 HWND_NOTOPMOST窗口在列表窗口的顶部,在顶层窗口 ---- WFlags参数是一个整数值,有八个可选值:
>
序号可以选择价值
1 SWP_DRAWFRAME角色周围画一个框窗
2 SWP_HIDEWINDOW隐藏窗口
3 SWP_NOACTIVATE不激活窗口
4 SWP_NOMOVE保持窗口
5 SWP_NOREDRAW窗口的当前位置不自动重绘
6 SWP_NOSIZE保持当前窗口的大小
7 SWP_NOZORDER保持窗口在窗口中列出
8 SWP_SHOWWINDOW当前位置显示窗口
----这七个变量的函数以下示例程序演示试验做出正确的选择,在应用程序运行后的窗口可以保持在总量的顶部,程序清单如下: BR p> Explicit选项
私人声明函数SetWindowPos
解放“USER32”(BYVAL HWND长,_
BYVAL hWndInsertAfter长,
BYVAL X倍, BYVAL y为龙,_
BYVAL CX长,BYVAL CY一样长,
BYVAL wFlags长),只要
私人常量HWND_TOPMOST = -1
私人常量SWP_SHOWWINDOWS =& H40
私人小组Form_Load()
昏暗retValue只要
retValue = SetWindowPos(Mehwnd,
HWND_TOPMOST,MeCurrentX,_
我。CurrentY的,300,300,SWP_SHOWWINDOWS)
END SUB ----注:当你写一个函数声明时,整个函数的声明必须写在一行,不能开始新的一行。通常是一个函数声明从系统中自动获取,方法是从加载项管理器启动VB的“API浏览”程序,找到所需的函数声明中“API浏览”程序,然后复制到VB代码。

版本 2DLL命令 SetWindowPos, , "user32dll", "SetWindowPos", , SetWindowPos(hwnd,hWndInsertAfter,x,y,cx,cy,wFlags)
参数 hwnd, 整数型, , 欲定位的窗口
参数 hWndInsertAfter, 整数型
参数 x, 整数型, , 窗口新的x坐标。如hwnd是一个子窗口,则x用父窗口的客户区坐标表示
参数 y, 整数型, , 窗口新的y坐标。如hwnd是一个子窗口,则y用父窗口的客户区坐标表示
参数 cx, 整数型, , 指定新的窗口宽度
参数 cy, 整数型, , 指定新的窗口高度
参数 wFlags, 整数型
版本 2子程序 __启动窗口_创建完毕SetWindowPos (_启动窗口取窗口句柄 (), -1, 0, 0, 0, 0, 3)'窗口最前


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/yw/13336885.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-07-17
下一篇 2023-07-17

发表评论

登录后才能评论

评论列表(0条)

保存