عرض مشاركة واحدة
قديم 25-Jun-2011, 03:45 PM   #1
أحمد الغامدي
عضو مميز
 
تاريخ التسجيل: Jun 2007
المشاركات: 162
من مواضيعي  
Lightbulb كيفية إضافة رقم السطرلكل صنف في الفاتورة

السلام عليكم
هذه الكود يظهر رقم السطر في الفاتورة (هذه الميزة غير موجودة في النظام).

قم بإضافة التقرير الخاص بك الى الفيجوال بيسك
أضف Calculated Field الى التقرير باسم "CLineNumber"

وألصق الكود بالأسفل في الفيجوال بيسك

كود:
Option Explicit
Dim LineNumber As Integer

Private Sub Report_Start()
    LineNumber = 0
End Sub

Private Sub Report_BeforeAH(ByVal Level As Integer, SuppressBand As Boolean)
    Select Case Level
        Case 2
            LineNumber = LineNumber + 1
            CLineNumber = LineNumber
        Case Else
    End Select
End Sub
لا تنسى من حفظ التغيرات في الفيجوال بيسك قبل إغلاق جريت بلينز

ولا تنساني من دعوة بظهر الغيب إن استفدت من هذا الموضوع
والسلام عليكم
أحمد الغامدي غير متواجد حالياً   رد مع اقتباس