Access DB Query 将由“,”分隔的列拆分为多行

我使用的是Access DB，表中数据如下

ID  Number
1   12,34,45,55,67,66,5,7
2   45,55,67,89,777
3   23,45,67,88,777,8888,564
4   1,234,567,890,987,650,000,000
5   222,233,345,645,634,000
6   33,44,55,66,77
7   12,34,22,88,99

我正在寻找的预期输出

Id  Number
1   12
1   34
1   45
1   55
1   67
1   66
1   5
1   7
2   45
2   55
2   67
2   89
2   777

我有accessdb，没有其他数据库。请求您帮助我解决这个问题，因为我不知道 Accessdb。如果您需要更多详细信息，请告诉我。

这是我在 Access db 查询中编写的查询，因此它要做的是根据在另一个表中更新的 Id 数字。

SELECT  t1.Id
        , t2.NUMBER 
FROM    table 1 AS t1 INNER JOIN table2 AS t2 ON t1.number LIKE t2.number & '*';

这是一项相当复杂的任务，但可以通过创建 VBA 函数来获取特定位置的项目，然后交叉连接预填充的连续序列表或序列生成查询来实现。

首先，我们声明 VBA 函数（来自here，我告诉你为什么你不能在那里使用 SQL）：

Public Function SplitString(str As String, delimiter As String, count As Integer) As Variant
    Dim strArr() As String
    strArr = Split(str, delimiter, count + 1)
    count = count - 1 'zero-based
    If UBound(strArr) >= count Then
        SplitString = strArr(count)
    End If
End Function

然后，我们将其与序列生成表/查询一起使用来分割字符串。在我的示例中，我将使用这个查询 by Gustav作为序列生成器：

SELECT MyTable.ID,  SplitString(MyTable.[Number], ",", Sequence.[Value]) As [Number]
FROM 
    MyTable,
    (
        SELECT DISTINCT 
        [Tens]+[Ones] + 1 AS [Value], 
        10*Abs([Deca].[id] Mod 10) AS Tens, 
        Abs([Uno].[id] Mod 10) AS Ones
        FROM 
            msysobjects AS Uno, 
            msysobjects AS Deca;
    ) As Sequence
WHERE SplitString(MyTable.[Number], ",", Sequence.[Value]) Is Not Null