VB.NET中設(shè)定窗體大小

窗體初始化時，設(shè)定Windowstate= maximized.

創(chuàng)新互聯(lián)是一家專業(yè)提供虎林企業(yè)網(wǎng)站建設(shè),專注與成都做網(wǎng)站、成都網(wǎng)站制作、成都外貿(mào)網(wǎng)站建設(shè)、H5場景定制、小程序制作等業(yè)務(wù)。10年已為虎林眾多企業(yè)、政府機(jī)構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專業(yè)網(wǎng)站制作公司優(yōu)惠進(jìn)行中。

窗體分辨率仍然可以設(shè)成1920x1080。設(shè)計元素的時候拖拽，或者使用代碼初始化控件。

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

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

代碼設(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)試時是以解釋型語言方式運(yùn)作,而輸出為EXE程序是是以編譯型語言方式運(yùn)作。可以看作是Visual Basic在.Net Framework平臺上的升級版本，增強(qiáng)了對面向?qū)ο蟮闹С帧?/p>

窗體最大化按鈕，按下后如何控制窗體大?。╲b.net）

前幾天的時候我?guī)腿私鉀Q過這個問題,現(xiàn)在又出來了.

在form_Resize()事件 里判斷窗口是不是最大化了 就行了,然后在把窗體大小調(diào)到自己的指定大小..

下面是我給你寫的VB代碼( 我沒有.net編譯器,不過相信你很容易就看懂了,我給你寫上注釋)

補(bǔ)充:剛才測試時有點(diǎn)小錯誤,現(xiàn)在更正好了.o(∩_∩)o...

Private kuandu As Long, gaodu As Long

Private Sub Form_Load()

'//將啟動窗體的寬 ,高屬性 賦值給全局變量

kuandu = Me.Width

gaodu = Me.Height

End Sub

Private Sub Form_Resize()

'//Resize()事件中如果最大化就會出錯.錯誤號是384

On Error GoTo Errhandle

If Me.WindowState = 2 Then

Me.Left = 0

Me.Top = 0

Me.Width = Screen.Width '//只進(jìn)行寬度變化

Me.Height = gaodu '//高度不變化

End If

Exit Sub

Errhandle:

If Err.Number = "384" Then '.net的我不知道是不是384

Me.WindowState = 0

Me.Left = 0

'Me.Top = 0

Me.Width = Screen.Width '//只進(jìn)行寬度變化

Me.Height = gaodu '//高度不變化

End If

End Sub

VB.NET設(shè)計中窗體大小設(shè)定

從來只有高分辨率下為低分辨率環(huán)境開發(fā)程序的。既然開發(fā)環(huán)境是低分辨率，那就只能利用代碼初始化各個控件的位置和大小了。隨測隨改。

vb.net 如何使得控件隨著窗體大小 的改變而改變呢，大家?guī)兔o想想，最好有代碼的哦

Public Class Form1

Dim 初始化控件自動大小調(diào)整與窗口的寬度比例 As Integer

Dim 初始化控件自動大小調(diào)整與窗口的高度比例 As Integer

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

初始化控件自動大小調(diào)整與窗口的寬度比例 = Me.Width / 控件自動大小調(diào)整.Width

初始化控件自動大小調(diào)整與窗口的高度比例 = Me.Height / 控件自動大小調(diào)整.Height

顯示控件的位置坐標(biāo)()

End Sub

Private Sub Form1_ResizeEnd(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.ResizeEnd

' Form1_ResizeEnd? 這個事件是 窗口大小變化完成后 再進(jìn)行操作的

控件自動大小調(diào)整.Location = New Point(控件自動大小調(diào)整.Left, 控件自動大小調(diào)整.Top)

'設(shè)置控件的初始左位置坐標(biāo)? 與? 上位置坐標(biāo)

控件自動大小調(diào)整.Size = New Point(Int(Me.Width / 初始化控件自動大小調(diào)整與窗口的寬度比例), Int(Me.Height / 初始化控件自動大小調(diào)整與窗口的高度比例))

'更改控件的大小? 按第一次窗口的比例 進(jìn)行調(diào)整

顯示控件的位置坐標(biāo)()

End Sub

Private Sub 顯示控件的位置坐標(biāo)()

Label1.Text = "控件的上邊距坐標(biāo)： " 控件自動大小調(diào)整.Top

Label2.Text = "控件的左邊距坐標(biāo)： " 控件自動大小調(diào)整.Left

Label3.Text = "控件的寬度大?。?" 控件自動大小調(diào)整.Width

Label4.Text = "控件的高度大小： " 控件自動大小調(diào)整.Height

End Sub

End Class

還有好多方法? 慢慢研究吧兄弟 希望能幫到你

在vb.net 中怎樣控制運(yùn)行時窗體的大小 和位置

Public Class Form1

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

Me.Left = 100'左

Me.Top = 100'上

Me.Width = 500'寬

Me.Height = 500'高

End Sub

End Class