VB6变量记录集名称

Question

是否可以使用变量来访问记录集的名称?

例如，我有一个包含10个字段的表，分别称为Name01，Name02，Name03.....Name10。我需要循环遍历它们，因此最好只使用一条指令，而不是重复相同的指令10次，每次使用不同的名称。

这是我现在正在使用的代码

Sal01 = rsUtility!Order01

Sal02 = rsUtility!Order02

.... 

Sal10 = rsUtility!Order10

这是我想要实现的内容：

对于 i 从 1 到 10 循环执行以下操作
    VariableName = "Order" & i 
    Sal(i) = rsUtility!VariableName 
下一个 i

- SilentRage47

Answer 1

给你：

for i = 1 to 10 
    VariableName = "Order" & i 
    Sal(i) = rsUtility(VariableName)
next i

- HK1

Answer 2

由于您的变量以两位数字结尾，因此您需要使用适当的格式而不仅仅是"Order" & i，因为它会导致Order1而不是Order01

For i = 1 to 10 
    Sal(i) = rsUtility("Order" & Format(i,"00") )
Next i

上述循环将从DB变量中的Order01到Order10范围内分配对应数组元素的值。

- George