如何在VB6里让程序始终处于最最前面显示要在别的全屏模式的程序的前面啊

我们看到有的应用程序不管窗口是否活动都使窗口保持在最上层，常见的Microsoft Word的文件打开和编辑查找窗口就是这样。在VB开发中可以通过调用SetWindowsPos()API函数实现这个功能。该函数声明如下：

Private 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

---- 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 显示窗口

---- 下面的例子程序Test演示了对函数中的以上7个变元作正确的选择后，应用程序运行后窗口总可保持在最上层,程序清单如下：

Option Explicit

Private 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

Private Const HWND_TOPMOST = -1

Private Const SWP_SHOWWINDOWS = &H40

Private Sub Form_Load()

Dim retValue As Long

retValue = SetWindowPos(Mehwnd,

HWND_TOPMOST, MeCurrentX, _

MeCurrentY, 300, 300, SWP_SHOWWINDOWS)

End Sub

---- 备注：编写函数声明时，整个函数声明须在一行中写完，不可提行。一般是自动从系统中得到函数声明，方法是从VB的外接程序管理中启动“API 浏览”程序，在“API 浏览”程序中找到所需的函数声明，然后复制到VB代码中。

由于问题描述的不是特别清楚，不清楚提主用的是XP，还是WIN7或者WIN10，在设置正确的前提下，分析有几个原因：

电脑卡住了，导致资源管理器异常

解决方法：Ctrl+Alt+Delete打开任务管理器将进程“explorer”结束，这时桌面图标和任务栏全无。在打开任务管理器，点击“文件”→“新建任务”，在打开的“创建新任务”对话框中输入“explorer”，单击“确定”。

PS:WIN10的explorer叫Windows资源管理器，右键点重新启动即可。

可能某一个软件设置窗口在最前，导致了其它窗口被遮挡，通常是视频播放器会有这个选项，检查一下设置。

系统文件损毁导致，通常是dll文件损毁或者丢失引起,百度一下修复DLL，或者使用PE系统检测修复，方法有很多，要是展开讲非常繁复，最后的解决办法就是重装系统了。

另窗口全部最小化可以用WIN键+D（既Alt左边那个Windows徽标），按一次显示桌面，再按一次窗口恢复原样，非常好用。

重装系统

楼上说的方法都不可行

这种情况多半是病毒引起的

不是单个缺失

不信你就试试<

直接在百度中搜吧，很多，建议不要装，严重影响系统运行速度。<

开始--运行--输入 gpeditmsc----打开组策略----打开用户配置---windows设置--点脚本(登陆注销)--双击右边的登陆---把里面设置的登陆脚本删除掉<

运行 msconfig 启动里把不要启动的勾掉<

中病毒了<

fpe2000

可以的<

按esc，出设置界面，第一项就是视频设置。然后右上是界面的分辨率，有一项是窗口模式，英文应该是windows mode，打上勾就可以了。<

你好，朋友。给你提供一些电脑快捷键，看看能不能帮上你。

单独按Windows：显示或隐藏“开始”功能表

Windows+BREAK：显示“系统属性”对话框

Windows+D：显示桌面

Windows+M：最小化所有窗口

Windows+Shift+M：还原最小化的窗口

Windows+E：开启“资源管理器”

Windows+F：查找文件或文件夹

Windows+CTRL+F：查找电脑

Windows+F1：显示Windows“帮助”

Windows+R：开启“运行”对话框

Windows+U：开启“公用程序管理器”

Windows+L：切换使用者（WindowsXP新功能）

Ctrl快捷键

Ctrl+S保存

Ctrl+W关闭程序

Ctrl+N新建

Ctrl+O打开

Ctrl+Z撤销

Ctrl+F查找

Ctrl+X剪切

Ctrl+C复制

Ctrl+V粘贴

Ctrl+A全选

Ctrl+[缩小文字

Ctrl+]放大文字

Ctrl+B粗体

Ctrl+I斜体

Ctrl+U下划线

Ctrl+Shift输入法切换

Ctrl+空格中英文切换

Ctrl+回车QQ号中发送信息

Ctrl+Home光标快速移到文件头

Ctrl+End光标快速移到文件尾

Ctrl+Esc显示开始菜单

Ctrl+Shift+<快速缩小文字

Ctrl+Shift+>快速放大文字

Ctrl+F5在IE中强行刷新

Ctrl+拖动文件复制文件

Ctrl+Backspace启动\关闭输入法

拖动文件时按住Ctrl+Shift创建快捷方式

Alt快捷键

Alt+F4关闭当前程序

Alt+空格+C关闭窗口

Alt+空格+N最小化当前窗口

Alt+空格+R恢复最小化窗口

Alt+空格+X最大化当前窗口

Alt+空格+M移动窗口

Alt+空格+S改变窗口大小

Alt+Tab两个程序交换

Alt+255QQ号中输入无名人

Alt+F打开文件菜单

Alt+V打开视图菜单

Alt+E打开编辑菜单

Alt+I打开插入菜单

Alt+O打开格式菜单

Alt+T打开工具菜单

Alt+A打开表格菜单

Alt+W打开窗口菜单

Alt+H打开帮助菜单

Alt+回车查看文件属性

Alt+双击文件查看文件属性

Alt+X关闭C语言

Shift快捷键

Shift+空格半\全角切换

Shift+右击右菜单打开方式

Shift+F10选中文件的右菜单

Shift+多级文件全部关闭

Shift+Del直接删除文件

Shift+＾处在中文标点符号半角在智能ABC中省曰号

Shift+\处在中文标点符号半角在智能ABC中顿号

快捷键

常规键盘快捷键

Ctrl+C复制。

Ctrl+X剪切。

Ctrl+V粘贴。

Ctrl+Z撤消。

DELETE删除。

Shift+Delete永久删除所选项，而不将它放到“回收站”中。

拖动某一项时按CTRL复制所选项。

拖动某一项时按CTRL+SHIFT创建所选项目的快捷键。

F2重新命名所选项目。

CTRL+向右键将插入点移动到下一个单词的起始处。

CTRL+向左键将插入点移动到前一个单词的起始处。

CTRL+向下键将插入点移动到下一段落的起始处。

CTRL+向上键将插入点移动到前一段落的起始处。

CTRL+SHIFT+任何箭头键突出显示一块文本。

SHIFT+任何箭头键在窗口或桌面上选择多项，或者选中文档中的文本。

Ctrl+A选中全部内容。

F3搜索文件或文件夹。

如果你是想在显示窗体的时候窗体一直在EXCEL表格的最前面，那么在显示窗体的语句处使用有模的方式打开，就是在show后面加个1：

例如：

sub

auto_open()

formnameshow

1

end

sub

如果是fromnameshow

0

或者formnameshow则窗体不会强制在最前面

如果想只显示窗体，EXCEL隐藏，则可通过下面语句可以设置EXCEL为不可见，只显示窗体：

private

sub

From_Load()

applicationvisible=false

end

sub

1、首先上网搜索下载一个名为<DeskPins>的软件，并将软件解压到本地文件夹中。

2、为了以后使用方便，我们选择将<DeskPins>发送到桌面快捷方式。

3、双击桌面上的<DeskPins>图标，这时你会发现桌面右下角的任务栏出现了<DeskPins>程序图标，表示程序可以正常工作了。

4、直接鼠标左键单击<DeskPins>图标或者右键单击图标后选择<Enterpinmode>,此时我们会发现鼠标的光标会变成一个大头针形状。

5、将大头针形状的图标移至想要置顶的程序框图上单击一下，然后就会发现程序框图的右上角会附着一个红色大头针形状的图标，此时我们就已经将此程序置顶了，当你再去切换打开其他窗口时，此程序窗口始终在最前面。

6、当要取消窗口置顶设置时，可以直接单击窗口右上角的大头针图标或者右击任务栏右下角中的程序图标，选择<Removeallpins>将置顶设置取消。

以上就是关于如何在VB6里让程序始终处于最最前面显示要在别的全屏模式的程序的前面啊全部的内容，包括:如何在VB6里让程序始终处于最最前面显示要在别的全屏模式的程序的前面啊、电脑点击每一个程序界面为啥不能在最前面了、在windows界面中，如何使某个程序窗口总是在最前面，而不被其他窗口覆盖等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！