说明:我的DataTable有四列,循环取出4列的列名,并显示i的值。 Dim a,i For i=1 to 4 a=DataTable.GetSheet("Global").GetParameter(i).Name msgbox a & iNext