close
تبلیغات در اینترنت
عدد منفی است یا مثبت؟
loading...

آموزش برنامه نویسی

سلام این برنامه عددی رو از ورودی دریافت میکنه  و میگه که عدد وارد شده مثبته یا منفی:   Private Sub Command1_Click() Dim inp As String inp = InputBox("Enter number") If IsNumeric(inp) Then If inp < 0 Then MsgBox ("Adad " + inp + " manfi ast") Else MsgBox ("Adad " + inp + " mosbat ast") End If Else MsgBox ("Loftan yek adad vared konid") End If End Sub

Admin بازدید : 223 پنجشنبه 19 بهمن 1391 نظرات ()

سلام

این برنامه عددی رو از ورودی دریافت میکنه  و میگه که عدد وارد شده مثبته یا منفی:

 

مطالب مرتبط
ارسال نظر برای این مطلب

نام
ایمیل (منتشر نمی‌شود) (لازم)
وبسایت
:) :( ;) :D ;)) :X :? :P :* =(( :O @};- :B /:) :S
نظر خصوصی
مشخصات شما ذخیره شود ؟ [حذف مشخصات] [شکلک ها]
کد امنیتیرفرش کد امنیتی
تبلیغات
Rozblog.com رز بلاگ - متفاوت ترين سرويس سایت ساز
اطلاعات کاربری
نام کاربری :
رمز عبور :
  • فراموشی رمز عبور؟
  • نویسندگان
    نظرسنجی
    قالب سایت؟




    بیشتر چه نوع مطالبی رو میپسندید؟





    آمار سایت
  • کل مطالب : 588
  • کل نظرات : 391
  • افراد آنلاین : 3
  • تعداد اعضا : 3326
  • آی پی امروز : 11
  • آی پی دیروز : 46
  • بازدید امروز : 44
  • باردید دیروز : 360
  • گوگل امروز : 4
  • گوگل دیروز : 8
  • بازدید هفته : 1,395
  • بازدید ماه : 5,847
  • بازدید سال : 8,079
  • بازدید کلی : 2,008,325