Append string value to table name

How do I get the value from "purchasing" table (assume that value is 1001) and make a new table called "sales" having that retrieved value after it, such as "sales1001"?

I've started....
sql = "SELECT max(transaction_id) as maxT INTO temp FROM purchasing; "
db.Execute sql
DoEvents

...and to make the new table...
sql2 = "SELECT cust_id, prod_id, qty INTO sales  <--how do I append the value 1001 here?
from cust_inv
db.Execute sql2
DoEvents