vb 如果动态给cmmad赋值

比如我有10个commad
给定一个数组a(1,2,3)
commada(0)，就等于1