网站建设资讯

NEWS

网站建设资讯

vb.net窗体强制最前 vb窗体起始位置设置

请问在VB中怎样使一个窗体运行时始终保持在最前?

这个简单啊,引用API函数SetWindowPos就可以解决。下面看看我的代码:

成都创新互联主营阿巴嘎网站建设的网络公司,主营网站建设方案,成都app软件开发,阿巴嘎h5微信小程序搭建,阿巴嘎网站营销推广欢迎阿巴嘎等地区企业咨询

Private Declare Function SetWindowPos Lib "user32.dll" (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 SWP_NOMOVE = H2

Const SWP_NOSIZE = H1

Const FLAG = SWP_NOMOVE Or SWP_NOSIZE

Const HWND_TOPMOST = -1

Const HWND_NOTOPMOST = -2

Const HWND_TOP = 0

Const HWND_BOTTOM = 1

将窗口设置最前:Call SetWindowPos(Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, FLAG)

取消窗口的最前:Call SetWindowPos(Me.hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, FLAG)

函数的第一个参数是根据实际情况改变的,它要求你给它传送一个窗口的句柄,这里的 Me.hwnd 就给函数传送了当前窗口的句柄,也就是将当前窗口前置或取消前置。如果要前置其他窗口,那么请向函数传送其他窗口的句柄,这个可以根据:FindWindow API函数获取。希望采纳意见,谢谢。。。

在VB中如何让窗体总在最前端显示(要求在任务管理器之前)

楼上的不行

我可以永远让窗体居前,运行

资源管理器

时不会被遮掩

添加一个Timer控件,将Interval属性设为100

Public

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

Sub

Timer1_Timer()

SetWindowPos

Me.hWnd,

HWND_TOPMOST,

0,

0,

0,

0,

O1

+

O2

End

Sub

VB.net如何设置程序运行时最先打开的窗体?

你是不是用的Visual Studio来开发的?如果是,这样操作:打开 项目 菜单 中的 XXX属性,在弹出的属性页选择最上面那个 应用程序 标签,里面有个启动窗体,你选择一下就可以了。

如果你不是用的visual Studio来开发的,那么可以考虑把另外一个窗口的visible属性先设置为false或者把你要显示的窗口改为对话框的形式,大小比另外一个窗口大一点或者一样(即 模态窗口,必须关闭才能继续操作),这样都可以实现你要的效果。

VB.NET如何让弹出的窗体显示在所有的窗体的最前面(包括其他程序打开的窗体)

你可以这样做,设置窗体的TopMost 属性为真!

Me.TopMost = True

Form.TopMost 属性

获取或设置一个值,指示该窗体是否应显示为最顶层窗体。


网站栏目:vb.net窗体强制最前 vb窗体起始位置设置
本文来源:http://cdweb.net/article/doiphpc.html