Dim PlayerSlots(6) As Pane
Dim StatPanelHeight As Int = 428
Dim NumberOfPanes As Int = 6
Dim PlayerSlotHeight As Int = 40
Dim PaneTotalHeight As Int = NumberOfPanes * PlayerSlotHeight
Dim PanelFreeHeight As Int = StatPanelHeight - PaneTotalHeight
Dim VerticalGap As Int = PanelFreeHeight / (NumberOfPanes + 1)
For I = 0 To 5 Step 1
PlayerSlots(I).Initialize("")
PlayerSlots(I).LoadLayout("PlayerSlot")
pnlHomeStats.AddNode(PlayerSlots(I), 0, (PlayerSlotHeight + VerticalGap) * 1 + VerticalGap, pnlHomeStats.Width, PlayerSlotHeight)
Next