关于vb script数组和函数功能的二个问题！高难度！

[cxx]

请问vb script的数组的下标能不只用数字来标识吗？
比如一个数组的下标可不可以用字符来代替。
比如我查询数据，然后用getrows()把数据返回到一个二维数组内，但此时数据已经和数据源分离，只能以array(0,0)等数字下标来访问数据，但是我想用array(列名,0)来访问。我也已经用rs("列名").name把列名放到一个一维数组里面了。但是我不知道怎么才能达到以上的效果。不知那位高手指教。
我在用php的时候，可以对一个二维数组进行多次下标定义，同样以上的数据返回的二维数组，我做到了以数字，小写列名，大写列名来访问这个二维数组。但在vb script里我不知道改怎么作？？或者vb script根本不能这样？？？
还有不知道vb script的自定义函数的参数能否带初值。
在php里我写的自定义函数可以带初值,如function(prar1,prar2=初值)，但是在vb script里面就不能这样定义，不知改怎样做到我想要的结果呢

高手们，展现你们的风采吧！！！

[cxx]

高手呢

[三杯倒]

1111

[Greendgh]

上述效果我认为可以用函数来达到。

[cxx]

可以请教具体怎么实现呢？？？

[cxx]

高手阿！！！看看阿

[北极海hein]

我看数组下标用字符不行吧。照你的意思，可能定义一个数据字典来存放数组的第一维下标呀，定义字典时用字段名作为关键字，对应该数组第一维下标。
dim myDic
set myDic=server.createobject("script.dictionary")
myDic.Add colName,0 'object.add key,item
对数据字典的具体用法你可以去查一查MSDN吧 ！