DataTableの列名の変更

Question

お世話になります

VB2008で開発しております

データテーブルのカラム名の変更をしたいと考えております。

下記の例で列名は表示出来るのですが

変更のし方が分かりません、列名プラス連番で

項目名を変更出来ないでしょうか。

Dim count As Integer = 0
For Each Col As DataColumn In table.Columns
    count = count + 1
    Debug.Print(Col.ColumnName & count)
Next

お手数でもよろしくお願いします。