Visual Basic.NET - radiobutton y delet

hola a todos los del foro espero que se encuentren bien de salud que es lo principal...

Pues igual, espero que me puedan ayudar,

Tengo 3 radiobutton (A, B, C)y lo que quiero es que al seleccionar uno ese se vaya a una base de datos, cuando le de click a un botón gurdar hice algo asi:

If Me.RadioButton1.Checked = True Then
a = Me.RadioButton1.Text
Me.RadioButton1.Text = "A"
End If
If Me.RadioButton2.Checked = True Then
b = Me.RadioButton2.Text
Me.RadioButton2.Text = "B"
End If
If Me.RadioButton3.Checked = True Then
c = Me.RadioButton3.Text
Me.RadioButton3.Text = "C"
End If

Dim q As New String("insert into Refacciones (Codigo Tipo) values ('" +_ Me.Txtcodigo.Text + "', ('" & a & "' or '" & b & "' or '" & c & "') )")

adapte = New OleDb.OleDbDataAdapter(q, coneccion)
adapte.Fill(dset, "Refacciones")

pero no lo hace no se que pase, espero me puedan ayudar

nota. quiete muchos de los campos con proposito de que se vea mejor y mas rápido

PERODN OLVIDE PORNER, LA COMO ENTRE "CODIGO Y TIPO" OSEA QUE ESE NO ES EL PROBLEMA

por lo que he entendido yo haria lo siguiente:

crearia una condicion logica para pasar el valor del radiobutton seleccionado asi
DIM valortipo as string

IF me.radiobutton1.checked=true
valortipo=a
endif
IF me.radiobutton2.checked=true
valortipo=b
endif
IF me.radiobutton3.checked=true
valortipo=c
endif

en la grabacion en el string

"INSERT INTO refacciones (codigo, tipo) values(' " &_
& me.txtcodigo.text &" ', " & " ' " & valortipo & " ')"