For Each dc As DataCol In DataTables("表A").DataColsnn = nn + 1 Output.Show("第 " & format(nn,"000") & " 列: " & "【" & dc.name.PadRight(你要达到的长度,比如7个字符,也可以编列所有字段,取最大值) & "】" & _ " 的字符长度是: " & dc.name.length)Next