برنامج إدارة المبيعات: الدرس العشر : صفحة المبيعات النقدية - الجزء 1: عرض فواتير المبيعات النقدية

في الدرس العاشر من برنامج ادارة المبيعات سنقوم بعرض وصولات او الفواتير الخاصة بالمبيعات النقدية داخل فورم  frmBills

متطلبات هذا الدرس 

• داتاكردفيو dgvTotal

أولا: داتاكردفيو dgvTotal .

يتم عرض معلومات (اسم الزبون، رقم الفاتورة، تأريخ البيع) لجميع المبيعات النقدية المخزنة داخل قاعدة البيانات داخل هذه الاداةوايضا تم اضافة زر لطباعة الفاتورة المحددة وزر اخر لحذف الفاتورة المحددة عن طريق كتابة الاكواد التالية داخل حدث تحميل الفورم frmBills_Load :-

Private Sub frmBills_Load(sender As Object, e As EventArgs) Handles MyBase.Load

  Dim daB As New OleDbDataAdapter("Select Bill_ID,Customer_Name,Total,Bill_Date

                                             From tblBills where Item_Name='المجموع'    order by Bill_ID DESC", con)
        Dim dtB As New DataTable
        dgvTotal.Columns.Clear()
        dtB.Clear()
        daB.Fill(dtB)
 
        dgvTotal.DataSource = dtB
 
        Dim colDelete As New DataGridViewButtonColumn
        colDelete.Name = "Delete"
        colDelete.Text = "❌"
        colDelete.UseColumnTextForButtonValue = True
 
        colDelete.FlatStyle = FlatStyle.Flat
        dgvTotal.Columns.Add(colDelete)
 
 
        Dim colPrint As New DataGridViewButtonColumn
        colPrint.Name = "Print"
        colPrint.Text = "🖨"
        colPrint.UseColumnTextForButtonValue = True
 
        colPrint.FlatStyle = FlatStyle.Flat
        dgvTotal.Columns.Add(colPrint)
 
 
        dgvTotal.ColumnHeadersDefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
 
        dgvTotal.Columns(0).HeaderText = "رقم الفاتورة"
        dgvTotal.Columns(0).Width = 60
        dgvTotal.Columns(0).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
 
        dgvTotal.Columns(1).HeaderText = "اسم الزبون"
        dgvTotal.Columns(1).Width = 165
        dgvTotal.Columns(1).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleLeft
 
        dgvTotal.Columns(2).HeaderText = "إجمالي الفاتورة"
        dgvTotal.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
        dgvTotal.Columns(2).Width = 80
 
        dgvTotal.Columns(3).HeaderText = "تأريخ البيع"
        dgvTotal.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
        dgvTotal.Columns(3).Width = 90
 
 
        dgvTotal.Columns(4).HeaderText = "حذف"
        dgvTotal.Columns(4).Width = 60
        dgvTotal.Columns(4).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
 
 
        dgvTotal.Columns(5).HeaderText = "طباعة"
        dgvTotal.Columns(5).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
        dgvTotal.Columns(5).Width = 60
 
 
        tbBillID.Text = dgvTotal.Rows(0).Cells("Bill_ID").Value.ToString
        tbCName.Text = dgvTotal.Rows(0).Cells("Customer_Name").Value.ToString
        tbDate.Text = dgvTotal.Rows(0).Cells("Bill_Date").Value

    End Sub

لتحميل الأكواد المستخدمة في الدرس إضغط هنا 

يمكنكم متابعة الدرس عن طريق اليوتيوب

دروس قد تهمك

شرح عرض فواتير- برنامج ادارة المطاعم https://youtu.be/pvGbqhxwo5o قوائم تشغيل قد تهمك 🎬 برنامج إدارة المطاعم - Vb.net and MS Access https://youtube.com/playlist?list=PLJ_b4a1hzeO_8w9hKbLq_FvhYquVLynqk دورة مايكروسوفت اكسس Microsoft Access https://www.youtube.com/playlist?list=PLJ_b4a1hzeO8kBfZzpjYGVB-i1dgrGyWW دورة ربط الفيجوال بيسك بقواعد البيانات (SQL Server - Access) https://www.youtube.com/playlist?list=PLJ_b4a1hzeO9-R7JTfRFsmHXaWhWaXTVP دورة تعلم الفيحوال بيسك (vb.net) https://www.youtube.com/playlist?list=PLJ_b4a1hzeO_qAeBJbFZlTWwLhqqpIMXk

للتواصل https://www.facebook.com/Info.AliAlhadithy #المبيعات #المدينون #مبيعات_غير_نقدية #مبيعات_آجلة #مبيعات_نقدية #حساب_المبيعات #فاتورة_ييع