جمع کردن متن(عدد) داخل چند edittext

[mostafaHD 44]

سلام.میخوام عدد های وارده در چند edittext رو با هم جمع کنم و جواب رو توی edittext دیگه نمایش بدم.

این کد رو نوشتم خطا میده.مشکلش چیه؟

EditText8.Text = ((EditText1.Text) * (EditText2.Text))+((EditText3.Text) * (EditText4.Text) * (EditText5.Text)) - ((EditText6.Text) / 30) - ((EditText3.Text) * (EditText7.Text) / 30)

[sganji 678]

اینا همه متغیرن با double تعریف شدن.نیای به .text ندارن که

اگه همشون متغیرن پس ایراد از یه جای دیگه است.

اگه میتونی کد های پروژه که مربوط به این هستن رو بذار.

[مجید آرتا 5,874]

دوست من عملیات ریاضی رو در متغییر های خودش انجام بدید نه با متغییر استرینگ*r24*

مقادیر رو به متغییر Int یا Float یا Double بدید و نتیجه رو هم توی همچین متغییری بریزید بعد این متغییر رو برابر با EditText کنید.

[mostafaHD 44]

ممنون از جوابتون.متغیرها من عدد های اعشاری هستن با اعشار زیلد از چه نوع متغیری استفاده کنم؟

[sganji 678]

از Double استفاده کن

[mostafaHD 44]

Sub Process_Globals
   'These global variables will be declared once when the application starts.
   'These variables can be accessed from all modules.
   Dim timer1 As Timer
End Sub

Sub Globals
   'These global variables will be redeclared each time the activity is created.
   'These variables can only be accessed from this module.
   Dim a As Int
   Private ImageView1 As ImageView
   Private ProgressBar1 As ProgressBar
   Private Button1 As Button
   Private EditText1 As EditText
   Private EditText2 As EditText
   Private EditText3 As EditText
   Private EditText4 As EditText
   Private EditText5 As EditText
   Private EditText6 As EditText
   Private EditText7 As EditText
   Private EditText8 As EditText
   Private EditText9 As EditText
   Dim txt1 As Double
   Dim txt2 As Double
   Dim txt3 As Double
   Dim txt4 As Double
   Dim txt5 As Double
   Dim txt6 As Double
   Dim txt7 As Double
   Dim txt8 As Double
   Dim txt9 As Double
End Sub

Sub Activity_Create(FirstTime As Boolean)
   'Do not forget to load the layout file created with the visual designer. For example:
   'Activity.LoadLayout("Layout1")
   Activity.LoadLayout("start")
   timer1.Initialize("timer1",50)
   timer1.Enabled = True
   a = 1

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub timer1_tick
ProgressBar1.Progress = a
a = a + 1
If ProgressBar1.progress=99 Then
ProgressBar1.visible=False
End If
If a > 100 Then
timer1.Enabled = False
Activity.RemoveAllViews
Activity.LoadLayout("main")
End If
End Sub

Sub Button1_click
txt8 = (txt1.text * txt2)+(txt3 * txt4 * txt5) - (txt6 / 30) - (txt3 * txt7 / 30)
EditText8.Text = txt8
End Sub

[مهدی ایزدی 9,203]

برادر گل من شما الان درسته متغیرهای Double رو تعریف کردید ولی بهشون مقدار ندادید که *che?*

[امیرنیوکی 147]

الان تو این کد متغیر double چیو باهم ضرب و تقسیم وجمع و تفریق کنه هیچکدومشون مقداری ندارن

شما باید در activity_Create این رو بنویسین و متغییرها رو مساوی اون تکست باکس قرار بدین اینطوری

Sub Activity_Create(FirstTime As Boolean)
   'Do not forget to load the layout file created with the visual designer. For example:
   'Activity.LoadLayout("Layout1")
   Activity.LoadLayout("start")
   timer1.Initialize("timer1",50)
   timer1.Enabled = True
   a = 1
   txt1 = EditText1.Text
   txt2 = EditText2.Text
   txt3 = EditText3.Text
   txt4 = EditText4.Text
   txt5 = EditText5.Text
   txt6 = EditText6.Text
   txt7 = EditText7.Text
   txt8 = EditText8.Text
   txt9 = EditText9.Text
End Sub

[mostafaHD 44]

سلام ببخشید تاپیک رو بالا اوردم.

این کد جاییش غلط داره؟ اخه خطا نمیده و خروجی نمیده

txt8 = (txt1 * txt2)+(txt3 * txt4 * txt5) - (txt6 / 30) - (txt3 * txt7 / 30)

[sganji 678]

ببین آخری همه txt ها یه text. بزار.

به این شکل:

[color=#000000][color=#0000BB]
txt8.text = .... [/color][/color]

[mostafaHD 44]

اینا همه متغیرن با double تعریف شدن.نیای به .text ندارن که