ขอคำแนะนำในการ Format Date ของ Column ใน DataGrid (WPF) หน่อยครับ

  Public Overrides Sub SetDataGrid(ByRef Dgv As DataGrid, ScrMode As SCR_MODE)
            'Throw New NotImplementedException()
            _Log.setProcessErrorInfo("BL0003", Reflection.MethodBase.GetCurrentMethod.Name, "CALL")
            Try
                '--- Fields Header Order --
                'Driver ID
                'Name
                'Phone
                'Status
                'License Plate
                'Description
                '----
                Dgv.Columns(0).Header = "Status Data"
                Dgv.Columns(1).Header = "Delete"
                Dgv.Columns(2).Header = "ID"
                Dgv.Columns(3).Header = "Name"
                Dgv.Columns(4).Header = "License Plate"
                Dgv.Columns(5).Header = "Phone"
                Dgv.Columns(6).Header = "Description"
                Dgv.Columns(7).Header = "Remark"
                Dgv.Columns(8).Header = "Picture Path"
                Dgv.Columns(9).Header = "Registered Date"
                Dgv.Columns(10).Header = "Status"

                Dgv.Columns(0).Width = 40
                Dgv.Columns(1).Width = 40
                Dgv.Columns(2).Width = 30
                Dgv.Columns(3).Width = 120
                Dgv.Columns(4).Width = 120
                Dgv.Columns(5).Width = 100
                Dgv.Columns(6).Width = 120
                Dgv.Columns(7).Width = 80
                Dgv.Columns(8).Width = 200
                Dgv.Columns(9).Width = 200
                Dgv.Columns(10).Width = 30

                Dgv.Columns(9)

                Dgv.Columns(0).DisplayIndex = 9
                Dgv.Columns(1).DisplayIndex = 10
                Dgv.Columns(2).DisplayIndex = 0
                Dgv.Columns(3).DisplayIndex = 1
                Dgv.Columns(4).DisplayIndex = 2
                Dgv.Columns(5).DisplayIndex = 3
                Dgv.Columns(6).DisplayIndex = 4
                Dgv.Columns(7).DisplayIndex = 5
                Dgv.Columns(8).DisplayIndex = 6
                Dgv.Columns(9).DisplayIndex = 7
                Dgv.Columns(10).DisplayIndex = 8


                Dgv.Columns(0).IsReadOnly = True
                Dgv.Columns(1).IsReadOnly = False
                Dgv.Columns(2).IsReadOnly = True
                Dgv.Columns(3).IsReadOnly = True
                Dgv.Columns(4).IsReadOnly = True
                Dgv.Columns(5).IsReadOnly = True
                Dgv.Columns(6).IsReadOnly = True
                Dgv.Columns(7).IsReadOnly = True
                Dgv.Columns(8).IsReadOnly = True
                Dgv.Columns(9).IsReadOnly = True
                Dgv.Columns(10).IsReadOnly = True

                If ScrMode = SCR_MODE.NEW_MODE Then
                    Dgv.Columns(1).Visibility = Windows.Visibility.Visible
                Else
                    Dgv.Columns(1).Visibility = Windows.Visibility.Hidden
                End If

                Dgv.RowHeight = 25
                Dgv.UpdateLayout()
            Catch ex As Exception
                _Log.setProcessErrorInfo(ex)
                MsgBox(ex.ToString)
            Finally
                _Log.setEndProcessErrorInfo()
            End Try
        End Sub