کلیک بر باتن

[mostafa.kasiri 115]

سلام

من دو تا لیبل دارم 

وقتی روی باتن می زنم توی یکی از لیبل ها متن می ره ام توی لیبل اول عدد صفر می خوره باید دو بار کلیک کنم تا درست بخوره چکار کنم

[porya 959]

شما این کد رو امتحان کن...

Sub Button1_Click
i=A.Text
i1=B.Text
i2 = i + i1 
Label1.Text= i2
Label2.text= i2 / 2
End Sub

[m007moh 181]

Sub Button1_Click

Label1.text="matn1"

Label2.text="matn2"

End Sub

[mostafa.kasiri 115]

سلام

منظور من رو متوجه نشدید 

من یک نرم افزار برای معدل درست کردم می خوام هم معدل رو نشون بده و هم جمع معدل رو در لیبل 2 نشون میده اما جمع رو در لیبل 1 نشان نمیده

[m007moh 181]

داداش تکه کدت رو بذار ببینم

[mostafa.kasiri 115]

بفرمایید

Sub Globals
Private Label1 As Label
Dim i ,i1,i2 As Int
Private A As EditText
Private B As EditText
Private Button1 As Button
Private Label2 As Label
End Sub

 

 

Sub Button1_Click
    Label1.Text= i2
i=A.Text
i1=B.Text
i2 = i + i1 
Label2.text= i2 / 2
End Sub