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

由于你的变量有一个2位数的结尾，你必须使用正确的格式而不仅仅是"Order" & i ，因为它将导致Order1而不是Order01

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

上面的循环将从Order01到Order10包括Order01范围内的DB变量为相应的数组元素Order10