Visual Basic - Pasar parametros a un Recordset (URGENTE!!!!)

Mi consulta es la siguiente:

Necesito pasar como parametros un texto que esta contenido en un combobox como parametro a un recordset. En este momento estoy utilizando ADO. Es decir, mi pregunta apunta a lo siguiente tengo una variable definida como String llamada DATO. Los combobox contienen el nombre de la columna referida a la Base de Datos, por ejemplo, NRO DE FACTURA. La parte del codigo que tengo problemas es la siguiente:

archivo = "c:\Facturacion" & "Cotiz" & Format(Date, "hhmmss") & ".txt"
Open archivo For Output As #1
Do Until rst1.EOF = True
If rst1.EOF = True Then
rst1.MoveFirst
Exit Do
End If
If campo1.Text <> "" then
dato = "rst1!" & tipomoneda
Print #1, dato
GoTo registro_cotizaciones_1
End If
rst1.MoveNext
If rst1.EOF = True Then
rst1.MoveFirst
Exit Do
End If
Loop
If rst1.EOF = True Then
rst1.MoveFirst
End If
Close #1

El problema esta que cuando yo quiero grabar en el archivo me graba rst1!tipomoneda, en lugar de recorrer la base de datos y grabarme el contenido del campo

Creo que la forma correcta de de asignar un valor a dato es dato=rst1!tipomoneda. Osea Recordset ! Campo sin comillas.