|
可以用查询实现,ACCESS的查询能力超乎想像的强大。
如果备注中的列数固定就非常简单,直接做个联合查询就可以了。(就不举例了)
如果备注中的列数不固定,做个分割函数,再创建最大列数的联合查询就可以了。
具体如下:
SELECT 订单表.订单号, 分割(备注,0) AS 备注1
FROM 订单表 where 分割(备注,0)<>""
UNION ALL SELECT 订单表.订单号, 分割(备注,1)
FROM 订单表 where 分割(备注,1)<>""
UNION ALL SELECT 订单表.订单号, 分割(备注,2)
FROM 订单表 where 分割(备注,2)<>""
UNION ALL SELECT 订单表.订单号, 分割(备注,3)
FROM 订单表 where 分割(备注,3)<>""
UNION ALL SELECT 订单表.订单号, 分割(备注,4)
FROM 订单表 where 分割(备注,4)<>""
UNION ALL SELECT 订单表.订单号, 分割(备注,5)
FROM 订单表 where 分割(备注,5)<>""
UNION ALL SELECT 订单表.订单号, 分割(备注,6)
FROM 订单表 where 分割(备注,6)<>""
UNION ALL SELECT 订单表.订单号, 分割(备注,7)
FROM 订单表 where 分割(备注,7)<>"";
Public Function 分割(待分割数据, 数据所在列数) As String
数据数组 = Split(待分割数据, ",")
If 数据所在列数 > UBound(数据数组) Then
分割 = ""
Else
分割 = 数据数组(数据所在列数)
End If
End Function
|
|