Dim lista As List(Of String) = New List(Of String)()
lista.Add("TabPage1")
lista.Add("TabPage2")
lista.Add("TabPage3")
For i As Integer = 0 To lista.Count - 1
tabControl1.TabPages.Add((lista(i));
tabControl1.TabPages(i).Controls.Add(New DataGridView() With {
Name="dataGridView_" + lista(i),
Dock=DockStyle.Fill,
DataSource = xxx});
Next