微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

在 VBA MS Access 中减去数组而不更改原始数组

如何解决在 VBA MS Access 中减去数组而不更改原始数组

我正在尝试创建一个名为 ArrayThree 的数组,该数组是通过从 ArrayTwo 中减去 ArrayOne 来创建的。 ArrayOne 是 ArrayTwo 的子集。我在 VBA MS Access 中执行此操作。

我正在尝试对这些数组使用集合论,即。 {a,b,c,d} - {a,b} = {c,d} 所以 ArrayThree = ArrayTwo - ArrayOne

以下是我尝试过的,有没有其他方法可以做到这一点,因为我的方法似乎不适用于 MS Access VBA。

'making the first array
Dim ArrayOneValues As Recordset
Dim ArrayOne As Variant

Set ArrayOneValues = CurrentDb.OpenRecordset("SELECT numbers FROM table1") 

ArrayOne = ArrayOneValues.GetRows(ArrayOneValues.RecordCount)

'making the second array
Dim ArrayTwo(1 To 1000000) As Long

Dim i As Long
For i = LBound(ArrayTwo) To UBound(ArrayTwo)
    ArrayTwo(i) = i
Next i

'making the third array
ArrayThree = ArrayTwo - ArrayOne


版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。