To reproduce:
Sub New()
InitializeComponent()
ThemeResolutionService.ApplicationThemeName = "Breeze"
Dim dt As New DataTable
dt.Columns.Add("Id", GetType(Integer))
dt.Columns.Add("ParentId", GetType(Integer))
dt.Columns.Add("Name", GetType(String))
For index = 1 To 5
dt.Rows.Add(index, 0, "Parent" & index)
Next
Dim rand As New Random
For index = 6 To 25
dt.Rows.Add(index, rand.Next(1, 6), "Parent" & index)
Next
Me.RadGridView1.Relations.AddSelfReference(Me.RadGridView1.MasterTemplate, "Id", "ParentId")
Me.RadGridView1.DataSource = dt
Me.RadGridView1.AutoSizeColumnsMode = Telerik.WinControls.UI.GridViewAutoSizeColumnsMode.Fill
Me.RadGridView1.AutoSizeRows = True
End Sub