Functioner i et array

Hej er det muligt at lave et array hvor man gemmer sine functioner og der efter laver man et call på array..
her er noget code der ikke virker.. men det skulle give et indtryk på hvad det er jeg vil håber i kan hjælpem mig :-)

set rs = bla bla
rs.open "select function from tabel order by function"

dim test_array(9) ' max 9 record i rs
dim i

i = 0

do until rs.eof = true
  test_array(i) = rs.fields.items("function")
  i = i +1
loop

call functions(4)