2

フォームの幅と高さを表す 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 に答える