vb.net如何設(shè)置一個(gè)窗體為 寬度不能調(diào)節(jié)，而高度可以調(diào)節(jié)

vb.net設(shè)置一個(gè)窗體為，寬度不能調(diào)節(jié)，而高度可以調(diào)節(jié)，

創(chuàng)新互聯(lián)從2013年創(chuàng)立，是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司，擁有項(xiàng)目做網(wǎng)站、網(wǎng)站建設(shè)網(wǎng)站策劃，項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢(mèng)想脫穎而出為使命，1280元環(huán)縣做網(wǎng)站,已為上家服務(wù),為環(huán)縣各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:13518219792

代碼設(shè)置方法：

Dim form_width As Integer = Me.Width

Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize

If Me.Width form_width Then

Me.Width = form_width

'Debug.Print(TimeString "-" CStr(Me.Width))

End If

End Sub

vb.net，即Visual Basic.NET是基于微軟.NET Framework之上的面向?qū)ο蟮木幊陶Z言。其在調(diào)試時(shí)是以解釋型語言方式運(yùn)作,而輸出為EXE程序是是以編譯型語言方式運(yùn)作?？梢钥醋魇荲isual Basic在.Net Framework平臺(tái)上的升級(jí)版本，增強(qiáng)了對(duì)面向?qū)ο蟮闹С帧?/p>

vb.net中怎么可以讓窗體全屏顯示？

Me.Height = My.Computer.Screen.Bounds.Height

Me.Width = My.Computer.Screen.Bounds.Width

這是設(shè)置窗體的長寬和屏幕的分辨率一樣大小，相當(dāng)于全屏。

如果Me.WindowState=FormWindowState.Maximized的話，只是單純的將窗體最大化，但恢復(fù)窗口大小后窗體的大小實(shí)際上還和原來一樣大。

VB.NET的特點(diǎn)

1.真正成為面向?qū)ο笠约爸С掷^承性的語言。

2.窗體設(shè)計(jì)器支持可視化繼承，并且包含了許多新的特性，比如自動(dòng)改變窗體大小、資源本地化支持、數(shù)據(jù)類工具內(nèi)在支持XML數(shù)據(jù)。

3.直接建立在.NET的框架結(jié)構(gòu)上，因此開發(fā)人員可以充分利用所有.NET平臺(tái)特性，也可以與其他的.NET語言交互。

4.為Windows應(yīng)用程序提供了XCOPY部署，開發(fā)者不再需要為DLL的版本問題擔(dān)憂。

VB.NET改變無框窗體大小

改變大小用Me.Width和Me.Height就行了，樓主想問的是允許用戶改變無邊框窗體的大小吧？

Public Class Form1

Private Declare Function GetWindowLong Lib "user32.dll" Alias "GetWindowLongA" (ByVal hwnd As Int32, ByVal nIndex As Int32) As Int32

Private Declare Function SetWindowLong Lib "user32.dll" Alias "SetWindowLongA" (ByVal hwnd As Int32, ByVal nIndex As Int32, ByVal dwNewLong As Int32) As Int32

Private Const GWL_STYLE As Int32 = -16

Private Const WS_THICKFRAME As Int32 = H40000

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

Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None

Dim style As Int32 = GetWindowLong(Me.Handle, GWL_STYLE) Or WS_THICKFRAME

SetWindowLong(Me.Handle, GWL_STYLE, style)

End Sub

End Class

vb.net中怎么使窗體全屏顯示？

Me.Height = My.Computer.Screen.Bounds.Height\x0d\x0aMe.Width = My.Computer.Screen.Bounds.Width\x0d\x0a這是設(shè)置窗體的長寬和屏幕的分辨率一樣大小，相當(dāng)于全屏。\x0d\x0a如果Me.WindowState=FormWindowState.Maximized的話，只是單純的將窗體最大化，但恢復(fù)窗口大小后窗體的大小實(shí)際上還和原來一樣大。