Conversion de datos string en integer desde vb6

Hola mi problema es que estoy haciendo un sistema que debe cargar un txt leeerlo y debe aguardar en una tabla, pero al momentro de guardar me dice erro de tipo de dato no conciden ya que la variable ne vb es de tipo string y en base de dato son numérico y el otro es varchar, he investigado ya y prove con una conversión pero aun así no funciona si le puedes echar una mirada haber que hago mal.
base de dato: codigo_lab = numerico, conc = nvarchar
archivo de texto: code = string, conc = string
este es el codigo:
Private Sub btnguardar_Click()
Dim NtshsRs As ADODB.Recordset
Dim examen1 As String
Dim code As String
Dim conc As String
examen1 = FreeFile
examen1 = Me.txtexamen1.Text
Open examen1 For Input As #1
Do While Not EOF(1)
       Line Input #1, code
       Line Input #1, conc
        Set NtshsRs = New ADODB.Recordset
            With NtshsRs
                .Open "select * From ntshs ", CONEXION_ADO, adOpenStatic, adLockOptimistic
                    .AddNew
                    .Fields("codigo_lab") = code ////aqui me manda el error segun encontre en internet para hacer la conversion la psu asi Cstr(code) y no paso nada mando error intente con Int y tampoco con Val nada.
                    .Fields("conc") = conc
                    .Update
                .Close
            End With
        Set NtshsRs = Nothing
    Loop
MsgBox "Guardado satisfactoriamente"
Close #1
End Sub