ورود

نسخه کامل مشاهده نسخه کامل : قدر مطلق


gmuosavi
07-05-2009, 23:28
سلام

كد يه برنامه ساده رو ميخواستم :

برنامه اي كه عدد رو از ورودي دريافت كنه و قدر مطلق اون رو چاپ كنه

ممنون
hosein182421824218
08-05-2009, 14:42
با سلام برای محاسبه قدر مطلق میتونی از تابع ABS استفاده کنی
یه دکمه با 2 تکس باکس رو فرمت قرار بده و کد زیر رو تو دکمه وارد کن


Dim a, b As Double
a = TextBox1.Text
b = Math.Abs(a)
TextBox2.Text = b
حالا اگه عدد منفی وارد کنی تبدیل به مثبتش میکنه
hosein182421824218
08-05-2009, 14:43
:11::11:با سلام برای محاسبه قدر مطلق میتونی از تابع ABS استفاده کنی
یه دکمه با 2 تکس باکس رو فرمت قرار بده و کد زیر رو تو دکمه وارد کن


Dim a, b AsDouble
a = TextBox1.Text
b = Math.Abs(a)
TextBox2.Text = b
حالا اگه عدد منفی وارد کنی تبدیل به مثبتش میکنه