ms-access - 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

score 3 · Accepted Answer

干得好：

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

score 1 · Accepted Answer

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

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

上面的循环将为 DB 变量中的相应数组元素分配一个值，范围为 fromOrder01到Order10inclusive

2 回答 2