这样写
Dim str As String = ""For Each c As Col In Tables("表A").Cols If c.IsNumeric Then str &= "isnull(" & c.Name & ",0)+" End IfNextmsgbox(str.Trim("+"))
加好友 
发短信
Post By：2014/12/17 16:15:00 [显示全部帖子]
