Visual Basic - Obtener nombre columna DataTable para mostrarlo en una celda.

Hola a todos.

A ver si me podéis ayudar. Tengo una tabla (datatable) con diferentes columnas, y lo que trato de conseguir es capturar el nombre de la cabecera de una de las columnas y mostrarlo en una de las celdas, pero no soy capaz.

Esto es lo que tengo hecho:

Dim tmpCondiCli_rows As DataRow()
Dim dr As DataRow
dr = tmpCondiCli.NewRow

' Creo dos columnas nuevas
tmpCondiCli.Columns.Add("tmpcFiltro", Type.GetType("System.String"))
tmpCondiCli.Columns.Add("tmpcDato", Type.GetType("System.String"))

' hago el filtrado
tmpCondiCli_rows = tmpCondiCli.Select("tmpcFam <> '' ")

For Each i As DataRow In tmpCondiCli_rows
tmpCondiCli.ImportRow(dr)
' Añadimos el campo filtro
tmpCondiCli.Columns.Item("tmpcDato").Expression = tmpCondiCli.Columns.Item("tmpcFiltro").ColumnName
' Añadimos el campo dato
tmpCondiCli.Columns.Item("tmpcDato").Expression = "tmpcFam"
Next

TablaCondicionesMovil.DataBind()

Muchas gracias.