What do you think of doing an array like this?

Code:
redim preserve aData(i)
aData(i) = array(strTypeSelected, strHTML)