Visual Basic基于值的变化值

时间:2013-03-16 18:57:15

标签: vba

基本上我有10个名为:

的整数
i1,i2,i3,i4,i5,i6,i7,i8,i9,i10

现在我有一个计算,每当它返回1-10之间的值时,它必须将相应的整数增加1。

我知道我可以用case或10 ifs来做这件事,但有没有办法生成变量名,我想改变什么。伪代码:

value = x // a value is being returned
(i+x)++;  // increase the according variable by one

1 个答案:

答案 0 :(得分:3)

简单地创建一个数组会不会更容易,并且根据返回的值,在给定索引处增加数组中的值?

例如:

Dim myArray(1 To 10) As Integer
value = x                          'a value is being returned
myArray(x) = myArray(x) + 1        'increment value in array