连接的字符数只能小于250个,超出了就不显示了,如何处理啊?作者: andymark 时间: 2006-8-4 04:04
不会到了极限吧,名字栏改成备注行不行作者: sxgaobo 时间: 2006-8-4 04:09
就是备注的啊!作者: sxgaobo 时间: 2006-8-4 18:35
Function StrLin(STab, StrZd As String) As String
Dim S, E, N As Integer
Dim SStr, Stem As String
S = DMin("[ID]", STab)
E = DMax("[ID]", STab)
For N = S To E
Stem = DLookup(StrZd, STab, "[id]=" & N)
SStr = SStr + Stem + "、"