Visual Basic - SETENCIAS SQL

HOLA programadores, tengo una duda, se le puede pasar a un text una sentencia sql es decir,
tengo un text1, y quiero que ese text1 me muestre la suma de un campo de una tabla de una base de datos en acces ejemplo

text1.text= "select sum(numero) from articulos where carro=1"

o como podria hacerlo,
agradezco si alguien me puede ayudar

HOLA
CARGAS UN RECORDSET Y LUEGO LO PASAS A LA VARIABLE O TEXT1

PRIVATE SUB SUMACAMPO
DIM RS AS RECODSET
DIM SQL AS STRING

SQL =""
SQL = SQL & "select sum(numero) As Suma from articulos where carro=1"
SET RS= OpenRecordset(Sql, dbOpenSnapshot)
IF RS.EOF=TRUE
RS.CLOSE
TEXT1.TEXT= 0
EXIT SUB
ENDIF

TEXT1.TEXT= RS("SUMA")
RS.CLOSE
END SUB

SALU2

HOLA VICTOR MR COPIE EL CODIGO PERO CUANDO LO EJECUTO PARA probarlo me dice funcion no definida o variable no definida y se repinta el openrecordset, sera que falta algo

gracias