Visual Basic - Cambiar valor del campo en datagrid

Antes de empezar: muchas gracias a quien me pueda ayudar

Necesito ayuda para cambiar los datos q se cargan desde una columna en mi base de datos. El campo es de tipo boolen y cuando carga al datagrid quiero q en vez de el valor 1 salga la palabra gravado y si el valor es cero q aparezca "exento".

Estoy usando una conexion ADO. Por favor ver el codigo q esta en el Form_load de la forma en donde esta el datagrid

Dim tField As ADODB.Field
Dim conexion As String
Dim sql As String

' abrir la base usando las credenciales de Windows
conexion = "Provider=SQLOLEDB; " & _
"Initial Catalog=tesis; " & _
"Data Source=(local); " & _
"integrated security=SSPI; persist security info=True;"

'se le asigna a la variable sql el comando sql "Select"
sql = "SELECT * FROM Productos "

' Por si ya estaba abierta...
Set cnn = Nothing
Set rst = Nothing
'
' Crear los objetos
Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset
'


'propiedad de conexion

cnn.CursorLocation = adUseClient
cnn.Open conexion

' abrir el recordset indicando la tabla a la que queremos acceder
rst.Open sql, cnn, adOpenStatic, adLockOptimistic


' datos en el recordset entonces se muestran en el datagrid

If rst.BOF = False And rst.EOF = False Then
Set dgrid_prod.DataSource = rst

Else
MsgBox "No hay datos"
End If


dgrid_prod.Columns(0).Caption = "CODIGO"
dgrid_prod.Columns(1).Caption = "DESCRIPCION"
dgrid_prod.Columns(2).Caption = "P. VENTA"
dgrid_prod.Columns(3).Width = 0 ' PRECIO COSTO
dgrid_prod.Columns(4).Width = 0 ' "GRAVADO/EXENTO"
dgrid_prod.Columns(5).Caption = "U. MEDIDA"
dgrid_prod.Columns(6).Width = 0 ' "CANT. MIN"
dgrid_prod.Columns(7).Width = 0 ' "CANT. MAX"
dgrid_prod.Columns(8).Width = 0 ' "PROVEEDOR"
dgrid_prod.Columns(9).Width = 0 ' "EXISTENCIAS"

Yo te recomiendo que en tu select establezcas los campos y además que para ese campo usa un case y cuando sea 0 pintas esto y si es 1 pintas lo otro... y ya está y lo jalas por el alias en tu ratagrid