Datatable Distinct Colm

dim dt as datatable
Dim dtTemp As DataTable
dt=dtTemp.DefaultView.ToTable(true,"Roomtype")