Forms VB.NET调整窗体大小并在文本框中检测大小

Forms VB.NET调整窗体大小并在文本框中检测大小,forms,textbox,resize,size,detect,Forms,Textbox,Resize,Size,Detect,有两个文本框,一个表示窗体的宽度,另一个表示窗体的高度 加载表单时,它会在每个文本框中显示表单的宽度大小和高度 当你调整表单大小时,它会自动更新文本框中的文本,并告诉你表单的当前大小 我该怎么做 我使用了下面的代码,以便您可以设置所需的大小,然后它将其应用于窗体的大小,但仍然没有弄清楚如何在调整大小时自动检测窗体的宽度和高度 Private sizew As Integer Private sizey As Integer sizew = TextBox1.Text sizey = Text

有两个文本框,一个表示窗体的宽度,另一个表示窗体的高度

加载表单时,它会在每个文本框中显示表单的宽度大小和高度

当你调整表单大小时,它会自动更新文本框中的文本,并告诉你表单的当前大小

我该怎么做


我使用了下面的代码,以便您可以设置所需的大小,然后它将其应用于窗体的大小,但仍然没有弄清楚如何在调整大小时自动检测窗体的宽度和高度

Private sizew As Integer
Private sizey As Integer

sizew = TextBox1.Text
sizey = TextBox2.Text
Me.Size = New System.Drawing.Size(sizew, sizey)

发现我做错了什么。对于那些想知道如何做到这一点的人,下面是代码

Private sizew As Integer
Private sizey As Integer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    TextBox1.Text = Me.Size.Width()
    TextBox2.Text = Me.Size.Height()
End Sub

Private Sub Form1_SizeChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.SizeChanged
    TextBox1.Text = Me.Size.Width()
    TextBox2.Text = Me.Size.Height()
End Sub

处理
SizeChanged
事件并读取
Me.Size

在窗体上放置计时器,设置间隔100,然后将此代码放置在窗体上

TextBox1.Text = Me.Size.Width()
TextBox2.Text = Me.Size.Height()
注意:确保定时器已启用