vb.net窗口最前 vb窗口始終在最前面

VB 怎么始終讓一個(gè)窗口至于最前端?

這個(gè)要用API,網(wǎng)上抄的代碼如下,如果你一點(diǎn)都不會(huì)API也是白搭

創(chuàng)新互聯(lián)專注于企業(yè)營(yíng)銷型網(wǎng)站建設(shè)、網(wǎng)站重做改版、潛山網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、HTML5、商城網(wǎng)站開發(fā)、集團(tuán)公司官網(wǎng)建設(shè)、成都外貿(mào)網(wǎng)站制作、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁(yè)設(shè)計(jì)等建站業(yè)務(wù),價(jià)格優(yōu)惠性價(jià)比高,為潛山等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。

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_NOSIZE?=?H1

'?保持窗口大小

Private?Const?SWP_NOMOVE?=?H2

'?保持窗口位置

Private?Sub?Form_Load()

SetWindowPos?Me.hwnd,?HWND_TOPMOST,?0,?0,?0,?0,?SWP_NOMOVE?Or?SWP_NOSIZE

'?將窗口設(shè)為總在最前

End?Sub

VB.NET如何讓彈出的窗體顯示在所有的窗體的最前面(包括其他程序打開的窗體)

你可以這樣做,設(shè)置窗體的TopMost 屬性為真!

Me.TopMost = True

Form.TopMost 屬性

獲取或設(shè)置一個(gè)值,指示該窗體是否應(yīng)顯示為最頂層窗體。

VB如何才能讓一個(gè)窗口顯示在所有窗口的最前端?

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)

VB.net如何設(shè)置程序運(yùn)行時(shí)最先打開的窗體?

你是不是用的Visual Studio來(lái)開發(fā)的?如果是,這樣操作:打開 項(xiàng)目 菜單 中的 XXX屬性,在彈出的屬性頁(yè)選擇最上面那個(gè) 應(yīng)用程序 標(biāo)簽,里面有個(gè)啟動(dòng)窗體,你選擇一下就可以了。

如果你不是用的visual Studio來(lái)開發(fā)的,那么可以考慮把另外一個(gè)窗口的visible屬性先設(shè)置為false或者把你要顯示的窗口改為對(duì)話框的形式,大小比另外一個(gè)窗口大一點(diǎn)或者一樣(即 模態(tài)窗口,必須關(guān)閉才能繼續(xù)操作),這樣都可以實(shí)現(xiàn)你要的效果。

VB.NET窗口置頂在最前面顯示的時(shí)候不影響目前鼠標(biāo)焦點(diǎn).

這是一個(gè)關(guān)于模態(tài)窗口與非模態(tài)窗口的問(wèn)題。

實(shí)現(xiàn)非模態(tài)窗口也沒(méi)什么難度

Dim form As New Form1

form.TopMost = True

form.Show()

你再將鼠標(biāo)移到父窗口上,彈出的窗口也不會(huì)消失。

請(qǐng)問(wèn)在VB中怎樣使一個(gè)窗體運(yùn)行時(shí)始終保持在最前?

這個(gè)簡(jiǎn)單啊,引用API函數(shù)SetWindowPos就可以解決。下面看看我的代碼:

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

將窗口設(shè)置最前:Call SetWindowPos(Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, FLAG)

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

函數(shù)的第一個(gè)參數(shù)是根據(jù)實(shí)際情況改變的,它要求你給它傳送一個(gè)窗口的句柄,這里的 Me.hwnd 就給函數(shù)傳送了當(dāng)前窗口的句柄,也就是將當(dāng)前窗口前置或取消前置。如果要前置其他窗口,那么請(qǐng)向函數(shù)傳送其他窗口的句柄,這個(gè)可以根據(jù):FindWindow API函數(shù)獲取。希望采納意見,謝謝。。。

網(wǎng)頁(yè)標(biāo)題:vb.net窗口最前 vb窗口始終在最前面
網(wǎng)站路徑:http://muchs.cn/article28/hgipcp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供品牌網(wǎng)站制作、網(wǎng)頁(yè)設(shè)計(jì)公司、App開發(fā)、網(wǎng)站營(yíng)銷、網(wǎng)站內(nèi)鏈、關(guān)鍵詞優(yōu)化

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)

成都網(wǎng)站建設(shè)公司