vb 如何將窗體的邊框隱藏

可以在設(shè)計(jì)階段，通過設(shè)置窗體的BorderStyle屬性為0-None使窗體無邊框。

曲陽ssl適用于網(wǎng)站、小程序/APP、API接口等需要進(jìn)行數(shù)據(jù)傳輸應(yīng)用場景，ssl證書未來市場廣闊！成為成都創(chuàng)新互聯(lián)公司的ssl證書銷售渠道，可以享受市場價(jià)格4-6折優(yōu)惠！如果有意向歡迎電話聯(lián)系或者加微信：13518219792（備注：SSL證書合作）期待與您的合作！

窗體的BorderStyle屬性有如下取值：

0---None 無邊框

1---Fixed Single 無最大/最小按鈕，固定單邊，運(yùn)行時(shí)不能窗體改變大小

2---Sizeable 標(biāo)準(zhǔn)窗體，默認(rèn)值

3---Fixed Dialog 固定對話框，沒有最小化和最大化按鈕，運(yùn)行時(shí)不能窗體改變大小

4---Fixed ToolWindow 固定工具窗口，沒有最小化和最大化按鈕和控制菜單，不能改變大小尺寸的

5---Sizeable ToolWindow 可改變尺寸工具窗口，運(yùn)行時(shí)可改變尺寸大小

vb.net 無邊框窗體的問題

設(shè)置窗體的text為空，設(shè)置窗體的controlbox屬性為false，設(shè)置窗體的FormBorderStyle 屬性為Sizable，就可以改變窗體大小了，并且可以在任務(wù)欄點(diǎn)擊。

VB.net怎么去掉MDI窗體立體邊框

DllImport("user32.dll",?ExactSpelling:=True)?_

Private?Shared?Function?SetWindowPos(ByVal?hWnd?As?IntPtr,?ByVal?hWndInsertAfter?As?IntPtr,?ByVal?X?As?Integer,?ByVal?Y?As?Integer,?ByVal?cx?As?Integer,?ByVal?cy?As?Integer,?_

ByVal?uFlags?As?UInteger)?As?Integer

End?Function

Private?Const?GWL_STYLE?As?Integer?=?-16

Private?Const?GWL_EXSTYLE?As?Integer?=?-20

Private?Const?WS_BORDER?As?Integer?=?H800000

Private?Const?WS_EX_CLIENTEDGE?As?Integer?=?H200

Private?Const?SWP_NOSIZE?As?UInteger?=?H1

Private?Const?SWP_NOMOVE?As?UInteger?=?H2

Private?Const?SWP_NOZORDER?As?UInteger?=?H4

Private?Const?SWP_NOREDRAW?As?UInteger?=?H8

Private?Const?SWP_NOACTIVATE?As?UInteger?=?H10

Private?Const?SWP_FRAMECHANGED?As?UInteger?=?H20

Private?Const?SWP_SHOWWINDOW?As?UInteger?=?H40

Private?Const?SWP_HIDEWINDOW?As?UInteger?=?H80

Private?Const?SWP_NOCOPYBITS?As?UInteger?=?H100

Private?Const?SWP_NOOWNERZORDER?As?UInteger?=?H200

Private?Const?SWP_NOSENDCHANGING?As?UInteger?=?H400

Public?Sub?ChangeMdiClientBorderStyle(ByVal?Value?As?System.Windows.Forms.BorderStyle,?ByVal?Handle?As?IntPtr)

Dim?style?As?Integer?=?GetWindowLong(Handle,?GWL_STYLE)

Dim?exStyle?As?Integer?=?GetWindowLong(Handle,?GWL_EXSTYLE)

'?Add?or?remove?style?flags?as?necessary.

Select?Case?Value

Case?BorderStyle.Fixed3D

exStyle?=?exStyle?Or?WS_EX_CLIENTEDGE

style?=?style?And?Not?WS_BORDER

Exit?Select

Case?BorderStyle.FixedSingle

exStyle?=?exStyle?And?Not?WS_EX_CLIENTEDGE

style?=?style?Or?WS_BORDER

Exit?Select

Case?BorderStyle.None

style?=?style?And?Not?WS_BORDER

exStyle?=?exStyle?And?Not?WS_EX_CLIENTEDGE

Exit?Select

End?Select

'?Set?the?styles?using?Win32?calls

SetWindowLong(Handle,?GWL_STYLE,?style)

SetWindowLong(Handle,?GWL_EXSTYLE,?exStyle)

'?Update?the?non-client?area.

SetWindowPos(Handle,?IntPtr.Zero,?0,?0,?0,?0,?_

SWP_NOACTIVATE?Or?SWP_NOMOVE?Or?SWP_NOSIZE?Or?SWP_NOZORDER?Or?SWP_NOOWNERZORDER?Or?SWP_FRAMECHANGED)

End?Sub

'''?summary

'''?獲取MDIClient句柄

'''?/summary

'''?returns/returns

'''?remarks/remarks

Private?Function?getMdiClientHandle()?As?IntPtr

Dim?Obj?As?MdiClient?=?Nothing

Dim?t?As?Type

For?Each?Item?As?Control?In?Me.Controls

t?=?Item.[GetType]()

If?t.Name?=?"MdiClient"?Then

Obj?=?DirectCast(Item,?MdiClient)

Exit?For

End?If

Next

If?Obj?IsNot?Nothing?Then

Return?Obj.Handle

Else

Return?IntPtr.Zero

End?If

End?Function

Private?Sub?Form1_Load(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?MyBase.Load

If?Me.IsMdiContainer?Then

ChangeMdiClientBorderStyle(BorderStyle.None,?getMdiClientHandle)

End?If

End?Sub

你好，麻煩你幫助我看看VB窗體的邊框怎么去掉？或是把VB窗體的關(guān)閉按鈕去掉

在屬性窗口中把窗體的BorderStyle屬性設(shè)為0即可（意思就是沒有邊框）

vb.net如何設(shè)置窗體內(nèi)部的大小（除去邊框及標(biāo)題欄部分的大小）

'窗體有個(gè)屬性ClientSize?是除去邊框及標(biāo)題欄部分的為工作區(qū)

'你要的應(yīng)該就是這個(gè)了。

'設(shè)置窗體工作區(qū)的大小?例為400*300

Me.ClientSize?=?New?Size(400,300)

網(wǎng)頁題目：vb.net窗體去掉邊框,windows去掉窗口邊框
新聞來源：http://chinadenli.net/article14/dsgidde.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站營銷、營銷型網(wǎng)站建設(shè)、網(wǎng)站設(shè)計(jì)公司、網(wǎng)站導(dǎo)航、微信公眾號、網(wǎng)站排名

廣告

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