اذهب إلى المحتوى
  • 0

كيف أحصل على جميع الخانات ذات قيمة DBNull الموجودة بـ Data Table على Vb.net؟

K@m@l

السؤال

لدي Data Table ملأتها بـ Linq على Vb.net وأريد معرفة الخانات التي بها DBNull داخل الجدول، كيف ذلك؟

مع العلم أني بدأت في كتابة الكود:

 

Private Function IsNotNullViolated(dt As DataTable, ColumnName As String) As Boolean

    Dim IsOk As Boolean = True

    Dim violatingCells =
        dt.AsEnumerable() _
        .Where(Function(i) i.RowState <> DataRowState.Deleted And (IsDBNull(i.Item(ColumnName))))

    For Each violatingCell In violatingCells
        violatingCell.SetColumnError(ColumnName, "Error, Violating Not Null")
        IsOk = False
    Next

    Return Not IsOk

End Function

 

رابط هذا التعليق
شارك على الشبكات الإجتماعية

Recommended Posts

  • 0

يمكنك استعمال الدالة Enumerable.Range والتي تولّد مجال من الأعداد الرقمية، للحصول على عدد الخانات، ثم المرور عليها بواسطة حلقة التكرار والتأكد من محتواها، بهذا الشكل:

Dim violatingRows =
    dt.AsEnumerable() _
    .Where(Function(i) i.RowState <> DataRowState.Deleted And (Enumerable.Range(0, dt.Columns.Count).Any(Function(c) IsDBNull(i.Item(c)))))

For Each violatingRow In violatingRows
    For c = 0 To dt.Columns.Count
        If IsDBNull(violatingRow.Item(c)) Then
            violatingRow.SetColumnError(c, "Error, Violating Not Null")
        End If
    Next
    IsOk = False
Next

 

Enumerable.Range, méthode (Int32, Int32) 

رابط هذا التعليق
شارك على الشبكات الإجتماعية

انضم إلى النقاش

يمكنك أن تنشر الآن وتسجل لاحقًا. إذا كان لديك حساب، فسجل الدخول الآن لتنشر باسم حسابك.

زائر
أجب على هذا السؤال...

×   لقد أضفت محتوى بخط أو تنسيق مختلف.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   جرى استعادة المحتوى السابق..   امسح المحرر

×   You cannot paste images directly. Upload or insert images from URL.

  • إعلانات

  • تابعنا على



×
×
  • أضف...