摘要:
列的循序调整View Code 1PrivateFunctionAdjustFirstColumn(ByValdsDataAsDataSet,ByValfirstColNameAsString)AsDataSet2DimblAsBoolean=False3ForEachdtAsDataTableIndsData.Tables4ForEachdrptAsDataColumnIndt.Columns5Ifdrpt.ColumnName=firstColNameThen6bl=True7EndIf8Next9IfblThen10dt.Columns(firstColName).SetOrdinal. 阅读全文
2011年11月17日 #