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

التاكد من وجود بيانات في Felxgrid

بدأه AHMAD KALIL في 22 فبراير 2009 · 4 رد · 510 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ماهي الجملة الشرطية للتاكد من ان جدول felxgrid ليس فارغ لان البرنامج صمم ان على المستخدم ادخال مادة على الاقل اي لايقبل الخزن في حال felxgrid لايوجد بها ولامادة ... ولكم الشكر

#2

هناك في FlexGrid حدث يسمى Validate للتحقق من البيانات المدخلة، وفيه وسيط يدعى Cancel في حال ضبطها إلى True فإنه لن يسمح لك بالانتقال من النص المحدد، مثلاً:

Private Sub MSFlexGrid1_Validate(Cancel As Boolean)

	If MSFlexGrid1.Text = vbNullString Then
		 Cancel = True
		MsgBox "You have to enter some data"
	End If

End Sub

وفقك الله

هذه الجملة خاطئة  :wacko: 


#3

بارك الله فيك ولكن ليس هذا قصدي بالرغم انك اضفت لي معلومة ولكن لدي برنامج وفيه حقول كثيرة ومن ضمنها جدول felxgrid لادخال المواد في حال تم الانتهاء من تعبة الفورم واراد المستخدم خزن البيانات ونسى اضافة مادة للجدول (felxgrid) اي الجدول فارغ والمفروض ادخال فيه على الاقل مادة فكيف عند تحويل الجدول الى قاعدة البيانات وهو فارغ ؟

ولك مني الشكر والتقدير

#4

إذاً ما رأيك بصنع دالة للتحقق من البيانات في الـFlexGrid فإن كان أحدها غير فارغ (فيه نص) فهذا يعني أن المستخدم قد أدخل مادة ما، وبهذا تنجح الدالة، وإلا فإنها ستفشل:

  1.  
  2. Private Function CheckFlexGrid() As Boolean
  3.  
  4.     Dim i As Integer, j As Integer
  5.  
  6.     For i = 1 To flx.Cols - 1
  7.         flx.Col = i
  8.         For j = 1 To flx.Rows - 1
  9.             flx.Row = j
  10.             If flx.Text <> vbNullString Then
  11.                 CheckFlexGrid = True
  12.                 Exit Function
  13.             End If
  16.  
  17. End Function
  18.  
ومثلاً في زر تخزين البيانات نكتب:
  1.  
  2. If CheckFlexGrid = True Then
  3.     SaveTheData
  4. Else
  5.     MsgBox "You have to enter some data"
  6. End If
  7.  

هل هذا ما تريده ؟ :)

      
      

      
هذه الجملة خاطئة  :wacko: 


    

  

    
    

      
#5
        
        

      
بورك فيك هذا هو المطلوب وفي ميزان اعمالك إن شاء الله حيث قمت بنسخ الدالة وعملت بالطريقة الصحيحة ازادك الله علما

      
      

      
    

  

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