VB如何才能让一个窗口显示在所有窗口的最前端?
而且,在最前端不会导致全屏程序的最小化。也就是说,运行全屏程序时,我可以控制某一个程序任意的显示与隐藏。而且,该程序可用。...
而且,在最前端不会导致全屏程序的最小化。也就是说,运行全屏程序时,我可以控制某一个程序任意的显示与隐藏。而且,该程序可用。
展开
展开全部
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)
Dim myval
窗口置前:
myval = SetWindowPos(form1.hwnd, -1, 0, 0, 0, 0, 3)
窗口正常:
myval = SetWindowPos(form1.hwnd, -2, 0, 0, 0, 0, 3)
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)
Dim myval
窗口置前:
myval = SetWindowPos(form1.hwnd, -1, 0, 0, 0, 0, 3)
窗口正常:
myval = SetWindowPos(form1.hwnd, -2, 0, 0, 0, 0, 3)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询