اهلا وسهلا بك فى بوابة الثانوية العامة ... سجل الان

العودة   بوابة الثانوية العامة المصرية > المرحلة الاعدادية > الفصل الدراسى الأول > الصف الثالث الاعدادى > كمبيوتر و تكنولوجيا المعلومات للصف الثالث الاعدادى > مراجعات و امتحانات حاسب آلى 3ع ترم 1

 
 
أدوات الموضوع انواع عرض الموضوع
Prev المشاركة السابقة   المشاركة التالية Next
  #19  
قديم 25-12-2015, 12:51 PM
olobnet olobnet غير متواجد حالياً
عضو مشارك
 
تاريخ التسجيل: May 2008
المشاركات: 119
معدل تقييم المستوى: 18
olobnet is on a distinguished road
افتراضي

Public Class Form1
Dim n As Integer = 1
Dim sum As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
sum = sum + n
n = n + 2
If n > 10 Then
Me.Text = n
End If
End Sub
End Class


اول قيمة سوف تظهر على شريط العنوان للنموذج هى 11
 

العلامات المرجعية


ضوابط المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا يمكنك اضافة مرفقات
لا يمكنك تعديل مشاركاتك

BB code متاحة
كود [IMG] متاحة
كود HTML معطلة

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


جميع الأوقات بتوقيت GMT +2. الساعة الآن 04:44 PM.