الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اكواد فيجوال بيسك

بدأه m-m-_- في 15 مارس 2011 · 4 رد · 1,355 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

Dim N As Integer

For N = 1 To 4

N =N+1

ListBox1.Items.Add (N

Next N

ممكن حد يفهمني الكود دا

Dim X As Integer

X=2

Do Until X =3

X=X*2

ListBox1.Items.Add(Math.Sqrt (X

X=3

Loop

Privat Sub Button1_Click

()

Dim num As Integer

num=5

TextBox1.Text=CStr

num) ^2

End Sub

تم تعديل هذه المشاركة بواسطة m-m-_- في 15 مارس 2011 في 19:12

اللهم صلي وسلم على سيدنا محمد وعلى آل محمد

#2
Dim N As Integer
For N = 1 To 4
N =N+1
ListBox1.Items.Add (N
Next N

عرفنا متغير من نوع Integer اسمه N

بعد عملنا تكرار من 1 إلى 4 كل مرة نضيف قيمة N إلى ListBox

ونزيد N كل مرة 1

---------------------

عفواً أحبتي انقطاعي بسبب الدراسة دعواتكم بالتوفيق..

{ لا ينال العلم مستحٍ ولا مستكبر }

#3

اعوض بN بكم في كل مره

وناتج الكود البرمجي حيكون في listBox الرقام من1,2,3,4 ولا 2,3,4

اللهم صلي وسلم على سيدنا محمد وعلى آل محمد

#4

هذا ليس مكان للاسئلة البرمجية بل هذا المشان للسؤال عن الشهدات اكتب سؤالك في قسم اكواد فيجوال بيسك

#5

شكرا اخي انا مستجد في هدا المشان

اللهم صلي وسلم على سيدنا محمد وعلى آل محمد

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…