منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : السلام عليكم اخوكم احمد ارجو التعديل على الكود دة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
Private Sub dgvManagCust_CellFormatting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles dgvManagCust.CellFormatting
        'اريد فى الكود دة انة عمود رقم4 يحتوى على 0و1 اريد 0 يساوى دخول 1 يساوي خروج
        If e.ColumnIndex = dgvManagCust.Columns(4).Index _
            AndAlso e.Value IsNot Nothing Then

            Select Case e.Value.ToString().Length
                Case 0
                    dgvManagCust.Columns(4).DefaultCellStyle.Format = ("دخول")
                        
                Case 1

                    dgvManagCust.Columns(4).DefaultCellStyle.Format = ("خروج")
            End Select

        End If




    End Sub
PHP كود :
Private Sub dgvManagCust_CellFormatting(ByVal sender As ObjectByVal e As DataGridViewCellFormattingEventArgsHandles dgvManagCust.CellFormatting
    
'اريد فى الكود دة انة عمود رقم4 يحتوى على 0و1 اريد 0 يساوى دخول 1 يساوي خروج
    If e.ColumnIndex = dgvManagCust.Columns(4).Index AndAlso e.Value IsNot Nothing Then

        Select Case e.Value
            Case 0
                e.Value = ("دخول")

            Case 1
                e.Value = ("خروج")

        End Select

    End If
End Sub