如何引用和解析 Json VBA Ms Access

Question

我希望得到帮助，将 Json 数组放入 Ms Access 中的表中，如何引用数组。

一段时间以来，我一直遇到数组问题，这就是为什么我需要一劳永逸地进行排序的原因

With rs
.AddNew
![id] = item("id")
![riority] = item("urgent")
![Status] = item("Closed")
.Update
End With
{
"Tickets": [
{
"id": 866883,
"type": "problem",
"priority": "urgent",
"status": "closed",
"follower_ids": [
7967649388,
7967864608,
365003995267,
7897694567,
7897776387,
7899032227,
7969040908,
7898078107
]
}
]
} 

我希望有人告诉我如何在 MS 访问 VBA 中引用数组中的值

Answer 1

要在 VBA JSON 中引用数组(使用字典(，您需要指定所需的数组中的哪个元素：

使用您的示例：

item(1)("id")等于866883，item(1)("status")等于closed.若要引用下一项，请使用item(2)("id")