是不是这里:
For Each dc As DataCol In dt.dataCols lst = dc.name & "|" & lstNext
改为:
For Each dc As DataCol In dt.dataCols
if lst = nothing
lst = dc.name
else lst = dc.name & "|" & lst
end ifNext否者您得到的列表项目最后多一个“|”