Sub setup
tblOne.SetColumns(Array As String("Text", "Numbers"))
tblOne.Items.Add(Array ("One", 1))
tblOne.Items.Add(Array ("Two", 2))
tblOne.Items.Add(Array ("Three", 3))
tblOne.Items.Add(Array ("Four", 4))
tblOne.Items.Add(Array ("Five", 5))
End Sub