[safnnn]

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

[a.ahmed]

PHP كود :

Private Sub dgvManagCust_CellFormatting(ByVal sender As Object, ByVal e As 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
            Case 0
                e.Value = ("دخول")

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

        End Select

    End If
End Sub