เรียกข้อมุลมาเเสดงใน DataGrid ได้เเล้ว แต่ผมอยากให้มันเรียกมาแต่ข้อมูลที่เป็นตัวอักษรครับ ไม่เอาตัวเลข

 If MessageBox.Show("คุณต้องการเรียกข้อมูลใช่หรือไม่?", "Database", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Yes Then
            '****การดึงข้อมูลมาโชว์ใน DataGrid****'
            DataGridView1.Show()
            lv.Hide()
            Using con As New SqlConnection("data source=woody;initial catalog=transport;uid=sa;pwd=47222420322")
                con.Open()
                Dim sql As String = "select * from tblsum where keydate ='" & dtp.Value.ToString("MM/dd/yyyy") & "'and tranid ='" & cb1.SelectedValue & "'"
                Dim cmd As SqlCommand = New SqlCommand(sql, con)
                Dim dr As SqlDataReader = cmd.ExecuteReader
                Dim dt = New DataTable
                If dr.HasRows Then
                    Dim r As Integer = 0
                    While dr.Read
                        With DataGridView1
                            r = .RowCount - 1
                            .Rows.Add()
                            .Rows(r).Cells(0).Value = dr.Item(2)
                            .Rows(r).Cells(1).Value = dr.Item(3)
                            .Rows(r).Cells(2).Value = dr.Item(4)
                        End With
                    End While
                End If
            End Using
        End If
        DataGridView1.Focus()
        butre.Enabled = False
        DataGridView1.Focus()
        butsup.Enabled = True
        buts.Enabled = False
        butadd.Enabled = False
        butprint.Enabled = False
        tsl1.Text = sum3().ToString("#,##0")
    End Sub