تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] تصحيح الكود التالي والإفادة
#1
السلام عليكم اخواني الأعزاء
عندي سوال بسيط وابيكم تساعدوني فيه جزاكم الله خيرا وفي ميزان حسناتكم
مطلوب كود يظهر التالي
Even Number = 2-4-6-8-.......-50
Odd Number = 1-3-5-7-......-49
ولكم جزيل الشكر والأمتنان
حاولت بهذا الكود بس ما ضبط
والتصحيح منكم مطلوب
dim i as integer
for i = 1 to 50 step 1
if ( i mod 2 = 0 ) then
richTextbox.AppendText("Even Number =" & i & "-")
Else
richTextbox.AppendText("Odd Number =" & i & "-")
Next
End if

ارجوا المساعدة والإيضاح ولكم خالص الشكر والتقدير
الرد
تم الشكر بواسطة:
#2
PHP كود :
Dim i As Integer 1

        
For As Integer 1 To 50

            
If 50 Then Exit For

            
ListBox1.Items.Add(i)
            
+= 1

            ListBox2
.Items.Add(i)
            
+= 1

        Next 
الرد
تم الشكر بواسطة: شنيني صراب
#3
PHP كود :
Dim odd ""even As String ""
        
For counter 0 To 50
            
If counter Mod 2 0 Then
                even 
even Str(counter) & "  "
            
Else
                
odd &= Str(counter) & "  "

            
End If 

Next
RichTextBox1.AppendText("Even Number =" & even & vbCrLf & "Odd Number=" & odd & vbCrLf)

PHP كود :
Dim odd ""even As String ""
        
For counter 0 To 50
            
If counter Mod 2 0 Then
                even 
even Str(counter) & "  "
            
Else
                
odd &= Str(counter) & "  "

            
End If 

Next
RichTextBox1.AppendText("Even Number =" & even & vbCrLf & "Odd Number=" & odd & vbCrLf)
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] ارجو المساعدة في تصحيح هذا الكود لزر الحفظ gharib 0 34 أمس, 12:39 PM
آخر رد: gharib
Smile ممكن شرح هدا الكود الزوي 1 39 18-10-18, 02:17 AM
آخر رد: عبد العزيز البسكري
  [سؤال] سؤال عام حول الكود في الفيجوال ستوديو Simo1991 2 87 11-10-18, 03:30 PM
آخر رد: Simo1991
  ممكن تحويل هذا الكود للسى شارب لو سمحتم ابو روضة 9 199 06-10-18, 02:07 AM
آخر رد: ابو روضة
  ما هو الكود المُستخدم لعدم السماح بترك ال Combobox فارغة Hazem1 26 481 04-10-18, 09:47 PM
آخر رد: princelovelorn
  هل الكود التالي صحيح لاستعادة قاعدة بيانات أكسس Hazem1 8 186 30-09-18, 01:41 AM
آخر رد: Hazem1
  [VB.NET] اريد تغير بسيط ع الكود ... e-coder 3 121 29-09-18, 04:09 PM
آخر رد: عبد الرؤوف
  احد يساعدني في تعديل هذا الكود nagoma 0 57 29-09-18, 12:06 AM
آخر رد: nagoma
  يُرجى شرح سطر البحث التالي في الداتاجريدفيو Hazem1 7 142 25-09-18, 11:41 PM
آخر رد: elgokr
  كيف اجعل هذا الكود يعمل على فريم ورك 4 ابو روضة 6 154 25-09-18, 11:19 PM
آخر رد: ابو روضة

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


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