How do i represent a string as a column name?

example: COLUMN_NAME = "SALES_10"

My Code:

dim i as integer
dim sStr as string

i = 10
sStr = "SALES_" & trim(str(i))
rs(sStr) = 9999 => this is ok
rs.update => generates an error