مشکل با اعداد

[mehrabmmp 528]

سلام دوستان

من تو تا ادیت تکست دارم

تو هر دوتا شون عدد مینویسم

و تویه یه لیبل میام ضرب اون دوتا عدد رو نشون میدم

ولی جواب اینجوریه

مثلا

edit text1 = 20

edit text2 = 20

 

label = 400.0

از یه متغییر int هم استفاده کردم ولی نمیشه

[پژمان نیکروان 6,055]

کدهای زیر رو جایگزین کدهاتون کنید:

		Dim int1,int2,int3 As Int
		int1 = EditText1.Text
		int2 = EditText2.Text
		int3 = (int1 * int2) / 100
		lblpayan.Text = int1 - int3

[پژمان نیکروان 6,055]

سلام

کدهایی که استفاده کردید میشه قرار بدید؟

[mehrabmmp 528]

Dim int1,int2 As Int

int1 = EditText1.Text

int2 = EditText2.Text

lblmegdar.Text = int1 * int2 / 100

lblpayan.Text = int1 - lblmegdar.Text