تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] سؤال في console
#1
السلام عليكم
ممكن مساعدة بسيطة يا اصدقاء

اريد عند كتابة رقم واحد في console يقوم بهذا الامر
كود :
   Console.WriteLine("Type a number and press Enter")
   num1 = Console.ReadLine()
   Console.WriteLine("Type another number to add to it and press Enter")
   num2 = Console.ReadLine()
   answer = num1 + num2
   Console.WriteLine("The answer is " & answer)
   Console.ReadLine()
و اذا ادخلت رقم 2 يقوم بهذا الامر
كود :
   Console.WriteLine("Type a number and press Enter")
   num1 = Console.ReadLine()
   Console.WriteLine("Type another number to add to it and press Enter")
   num2 = Console.ReadLine()
   answer = num1 - num2
   Console.WriteLine("The answer is " & answer)
   Console.ReadLine()
الرد
تم الشكر بواسطة:
#2
و عليكم السلام
تفضل
كود :
Public num1 As Integer
   Public num2 As Integer
   Public answer As Integer

   Sub Main()
       System.Console.WriteLine("Welcome")
       Module1.trakktour()
   End Sub
   Sub trakktour()
       System.Console.WriteLine("Pick a command:")
       System.Console.WriteLine("1) Addition")
       System.Console.WriteLine("2) Soustraction")
       Select Case Console.ReadLine
           Case "1" : Module1.Addition()
           Case "2" : Module1.Soustraction()
           Case Else : Module1.trakktour()
       End Select
   End Sub
   Sub Addition()
       Console.WriteLine("Type a number and press Enter")
       num1 = Console.ReadLine()
       Console.WriteLine("Type another number to add to it and press Enter")
       num2 = Console.ReadLine()
       answer = num1 + num2
       Console.WriteLine("The answer is " & answer)
       Console.ReadLine()

   End Sub
   Sub Soustraction()
       Console.WriteLine("Type a number and press Enter")
       num1 = Console.ReadLine()
       Console.WriteLine("Type another number to add to it and press Enter")
       num2 = Console.ReadLine()
       answer = num1 - num2
       Console.WriteLine("The answer is " & answer)
       Console.ReadLine()

   End Sub
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال بخصوص تشيك ليست بوكس نور الهدى الهدى 1 52 17-01-19, 09:31 PM
آخر رد: حريف برمجة
  سؤال في تغيير قيمة الخلية sofiane-phy 3 89 16-01-19, 11:09 PM
آخر رد: sofiane-phy
  [VB.NET] ;سؤال كيفية تعديل المدخلات في (الداتا قريد فيو ) قبل الحفظ في قاعدة البيانات EYADISMAIL 4 182 16-01-19, 01:26 AM
آخر رد: EYADISMAIL
  سؤال بخصوص تحديث بيانات DataGridView abdullhadi999 14 329 09-01-19, 10:56 PM
آخر رد: abdullhadi999
  سؤال عن سبب ظهور خطا غير متوقع alipro 3 107 08-01-19, 04:28 AM
آخر رد: محمد كريّم
  سؤال عن ربط الاكسل مع vb philo 3 120 07-01-19, 02:57 PM
آخر رد: elgokr
Big Grin سؤال حول فحص اذا كان برنامج قيد التشغيل او لا ahmadpal 4 118 07-01-19, 02:50 PM
آخر رد: elgokr
  سؤال فى الداتا جريد فيو احمد خطاب 5 178 03-01-19, 08:59 PM
آخر رد: احمد خطاب
  سؤال حول امر الطباعة الفورية Osama Bayoumy 5 467 01-01-19, 01:02 AM
آخر رد: اسامه الهرماوي
  سؤال فى الاستعلام احمد خطاب 0 58 25-12-18, 12:26 AM
آخر رد: احمد خطاب

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم