2

得到了两个文本框，一个代表表单的宽度，另一个代表表单的高度。

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

当您调整表单大小时，它会自动更新 texbox 中的文本并告诉您表单的当前大小。

我怎样才能做到这一点？

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

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
4

2 回答 2

2

处理SizeChanged事件并读取Me.Size.

于 2012-07-20T19:30:22.663 回答
1

在表格上放一个计时器并设置间隔 100 然后将此代码放在上面 

TextBox1.Text = Me.Size.Width()
TextBox2.Text = Me.Size.Height()

注意：确保定时器已启用

于 2012-12-27T20:20:14.663 回答