Access里自定义类似MySQL group_concat 的函数

MySQL里的group_concat很方便，MS-Access里没有。网上找到一个：http://access.mvps.org/access/modules/mdl0008.htm

Concatenate fields in same table
 Author(s) 
Dev Ashish 
 
 
(Q)    I need to concatenate a field in the format "Value1; Value2; Value3" etc. for each unique value of another field in the same table.  How can I do this?

(A)    Using the fConcatFld function,  in the Northwind database, the following query should return a concatenated list of all CustomerIDs if you group by ContactTitle. 

SELECT ContactTitle, fConcatFld("Customers","ContactTitle","CustomerID","string",[ContactTitle]) AS Customers FROM Customers GROUP BY ContactTitle;

'************ Code Start **********
'This code was originally written by Dev Ashish
'It is not to be altered or distribut