Inserting a string variable into sql query in vba

[kdjonesmtb2]

Hello,

I would like to insert a string variable from a datatable into the result of sql query in vba
dt_test_casenumber=trim(datatable("Test_Case_Number",dtGlobalSheet))
set rs602 = connB.execute("select * from #cpt_variance")
query = replace(query,"$TestCaseNumber$",dt_test_casenumber)

What is the correct syntax for combining the setrs602 command line with replace?

Thanks