仅在2个数字之间循环

Question

我一直在推迟问这个问题，因为这似乎是一个我可以解决的简单问题，但我已经绞尽脑汁而现在无法思考。我已经尝试了大量不同的代码组合，但似乎无法找到正确的代码。

我的2个问题：

• 我需要创建一个循环，只有在变量介于2个数字之间时才会触发。示例（这不起作用）：Do While SOPickRS.RecordCount >=1 and <=4

• 我需要一个监视循环记录的变量。计数器可以工作但是没有实际的ADODB变量吗？

我当前的代码：

While Not SOPickRS.EOF

        Do Until SOPickRS.RecordCount = 4

            'Do Stuff

        Loop

        Do Until SOPickRS.RecordCount = 8

             'Do Stuff

        Loop

        Do Until SOPickRS.RecordCount = 12

           'Do Stuff

        Loop


SOPickRS.MoveNext

Wend

GTG还指出，RecordCount不会起作用，因为它永远不会改变。

Answer 1

你是否正在尝试这样的事情：

currentRecord = 1
While Not SOPickRS.EOF

    if (currentRecord  >=1 and currentRecord  <=4)
        'Do Stuff
    end if
    currentRecord = currentRecord + 1
wend