1

あるフォームから別のフォームに値を転送するオブジェクトで警告が表示されます 警告は、Button1 への参照が有効になる前にオブジェクト Form1 で System.IDisposable.Dispose を呼び出さなければならないという警告です

これは私のボタン1の私のコードです:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim Form1 As New Form1
    Form1.a1 = TextBox1.Text
    Form1.a2 = TextBox2.Text
    Form1.a3 = TextBox3.Text
    Form1.a4 = TextBox4.Text
    Form1.a5 = TextBox5.Text
    Form1.a6 = TextBox6.Text
    Form1.a7 = TextBox7.Text
    Form1.a8 = TextBox8.Text
    Form1.a9 = TextBox9.Text
    Form1.a10 = TextBox10.Text
    Form1.Show()
    Form1.SetPrice()
    Me.Close()
End Sub

System.IDisposable.Dispose の使用方法

4

1 に答える 1

1

リストされたコードはForm1にないようです。フォームがどのようなものであっても、Form1をインスタンス化しますが、破棄することはありません。Form1をUsingステートメントでラップするだけです。

Using Form1 As New Form1
    Form1.a1 = TextBox1.Text
    Form1.a2 = TextBox2.Text
    Form1.a3 = TextBox3.Text
    Form1.a4 = TextBox4.Text
    Form1.a5 = TextBox5.Text
    Form1.a6 = TextBox6.Text
    Form1.a7 = TextBox7.Text
    Form1.a8 = TextBox8.Text
    Form1.a9 = TextBox9.Text
    Form1.a10 = TextBox10.Text
    Form1.Show()
    Form1.SetPrice()
End Using
Me.Close()
于 2013-03-12T23:07:49.083 に答える