تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] لوب
#2
كود             Exit For
يمكن هو السبب!
لانه بدون شرط فيخرج بعد اول دورة.

اذا مثل الموجود بالصورة:


PHP كود :
Private Sub Form1_Load(sender As ObjectAs EventArgsHandles MyBase.Load
        For i 
As Integer 0 To 5
            dgv1
.Rows.Add(i"Name: " iCDate("1/1/2000").AddYears(i).ToShortDateString)
 
       Next
    End Sub
    Private Sub Button1_Click
(sender As ObjectAs EventArgsHandles Button1.Click
        For i 
As Integer 0 To dgv1.Rows.Count IIf(dgv1.AllowUserToAddRows21)
 
           dgv1.Rows(i).Cells(3).Value CDate(dgv1.Rows(i).Cells(2).Value).AddYears(60).ToShortDateString
        Next
    End Sub 


الملفات المرفقة
.zip   For_muaamar.zip (الحجم : 50.61 ك ب / التحميلات : 13)
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}


الردود في هذا الموضوع
لوب - بواسطة muaamar - 13-06-22, 10:08 PM
RE: لوب - بواسطة سعود - 14-06-22, 03:14 AM

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


يقوم بقرائة الموضوع: