VB.NET中設定窗體大小

窗體初始化時，設定Windowstate= maximized.

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

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

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

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

代碼設置方法：

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之上的面向對象的編程語言。其在調試時是以解釋型語言方式運作,而輸出為EXE程序是是以編譯型語言方式運作。可以看作是Visual Basic在.Net Framework平臺上的升級版本，增強了對面向對象的支持。

窗體最大化按鈕，按下后如何控制窗體大小（vb.net）

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

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

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

補充:剛才測試時有點小錯誤,現(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 '//只進行寬度變化

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 '//只進行寬度變化

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

End If

End Sub

VB.NET設計中窗體大小設定

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

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

Public Class Form1

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

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

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

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

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

顯示控件的位置坐標()

End Sub

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

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

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

'設置控件的初始左位置坐標? 與? 上位置坐標

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

'更改控件的大小? 按第一次窗口的比例 進行調整

顯示控件的位置坐標()

End Sub

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

Label1.Text = "控件的上邊距坐標： " 控件自動大小調整.Top

Label2.Text = "控件的左邊距坐標： " 控件自動大小調整.Left

Label3.Text = "控件的寬度大?。?" 控件自動大小調整.Width

Label4.Text = "控件的高度大?。?" 控件自動大小調整.Height

End Sub

End Class

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

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

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

當前標題：vb.net中窗體寬度 vb通過代碼設置窗體大小
地址分享：http://vcdvsql.cn/article34/hpgpse.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供靜態(tài)網(wǎng)站、App開發(fā)、云服務器、微信小程序、網(wǎng)站收錄、關鍵詞優(yōu)化

廣告

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