2017-11-21 8 views
0

a_hasil(Form1)をlabel21(Form2)に表示すると混乱しました。誰かが私を助けてくれますか?私のコードで何が間違っています。おかげで をForm1:Form1からForm2に変数を表示

Public Class Form1 
Public a, b, c, d, a_hasil, b_hasil, c_hasil, d_hasil As Double 

Public Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click 

    a = Val(textBox1.Text) 
    b = Val(textBox2.Text) 
    c = Val(textBox3.Text) 
    d = Val(textBox4.Text) 

    a_hasil = (a * 1) + (b * 0.667) + (c * 1) + (d * 0.75) 
    b_hasil = (a * 0.5) + (b * 0.778) + (c * 0.667) + (d * 1) 
    c_hasil = (a * 0.625) + (b * 1) + (c * 0.778) + (d * 0.875) 
    d_hasil = (a * 0.5) + (b * 0.889) + (c * 0.889) + (d * 0.875) 


    Dim Form2 As New Form2 
    Form2.stringpass = a_hasil 
    Form2.Show() 

End Sub 
End Class 

のForm2:

Public Class Form2 
Public Property stringpass As Double 
Public Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) 
    label21.Text = stringpass 
End Sub 
End Class 
+1

Public Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) 

変更は、 'Handles'キーワードが欠落している、Form2_Loadメソッドが実行される可能性が非常に高いではありません。デバッガを使用して、ブレークポイントを設定してください。 'Handles MyBase.Load'を追加するか、デザイナーを正しく使って修正してください。 –

答えて

0

あなたのloadメソッドが呼び出されることはなかったです。ハンドルを追加します。残りは大丈夫ですが、クラス変数を必要なものだけに制限するようにお願いします。

Public Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Me.Load 
関連する問題