جمع دو عدد اعشاری [بایگانی]

dr.undead

دوشنبه 25 دی 1391, 23:39 عصر

ممنون از دوستانی که خیلی راهنمایی کردن بخصوص THe king
آقا چجوری میشه دو عدد اعشاری که توی label هست باهم جمع کرد؟
چیزی که من نوشتم مثل جمع دو رشتس Label7.Text = Label6.Text + Label3.Text
راهنمایی لطفا

the king

دوشنبه 25 دی 1391, 23:46 عصر

ممنون از دوستانی که خیلی راهنمایی کردن بخصوص THe king
آقا چجوری میشه دو عدد اعشاری که توی label هست باهم جمع کرد؟
چیزی که من نوشتم مثل جمع دو رشتس Label7.Text = Label6.Text + Label3.Text
راهنمایی لطفا

Label7.Text = (Double.Parse(Label6.Text) + Double.Parse(Label3.Text)).ToString()

dr.undead

دوشنبه 25 دی 1391, 23:52 عصر

این جواب نمیده :(

arash020

دوشنبه 25 دی 1391, 23:53 عصر

سلام

lable1.text=val(x)+val(y)

dr.undead

دوشنبه 25 دی 1391, 23:55 عصر

خودش بود
مرسی
جناب king از شماام ممنون برای راهنماییهای مفیدو کثیر

dr.undead

سه شنبه 26 دی 1391, 00:01 صبح

آقا این دستور برای اعداد بدون اعشار درست کارمیکنه
یعنی قسمت اعشار اعداد مثلا 0/5 + 0/25 = 0/25 میده
راه حلی دارید دوستان ؟

the king

سه شنبه 26 دی 1391, 00:44 صبح

آقا این دستور برای اعداد بدون اعشار درست کارمیکنه
یعنی قسمت اعشار اعداد مثلا 0/5 + 0/25 = 0/25 میده
راه حلی دارید دوستان ؟

تعجب کردم گفتید کار نمی کنه، شما در Text هاتون علامت ممیز اعشاری رو با / نشون دادید؟ می بایستی از . (نقطه) استفاده کنید، یا قبل از تبدیل رشته به عدد
عوض شون کنید. روال های عادی تبدیل رشته به عدد کاراکتر / رو نمی شناسند.

shahryari

سه شنبه 26 دی 1391, 09:15 صبح

Dim r As Double
r = Val(TextBox1.Text) + Val(TextBox2.Text)
Label1.Text = r

Moslem_Pc

دوشنبه 30 بهمن 1391, 21:51 عصر

به این دستور ساده توجه کنید

MsgBox(InputBox("first?") + +InputBox("second?"))

mostafarafinejad

سه شنبه 01 اسفند 1391, 14:01 عصر

100250

موفق باشین