VB6变量记录集名称

Question

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

例如，我有一个包含10个字段的表，名为Name01，Name02，Name03 ..... Name10。我需要循环使用它们，这样就可以使用一条带有10个不同名称重复相同的指令。

这是我现在使用的代码

Sal01 = rsUtility!Order01

Sal02 = rsUtility!Order02

.... 

Sal10 = rsUtility!Order10

这就是我想要完成的事情：

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

Answer 1

你走了：

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

Answer 2

由于您的变量有两个数字的结尾，您必须使用正确的格式，而不仅仅是"Order" & i，因为它会导致Order1而不是Order01

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

上面的循环将从Order01到Order10包括

的范围内的DB变量为相应的数组元素赋值