VB Code:
Dim t(4, 5) As TextBox
Dim fake(,) As String = {{"name1", "address1", "telno1", "faxno1", "sts1"}, _
{"name2", "address2", "telno2", "faxno2", "sts2"}, _
{"name3", "address3", "telno3", "faxno3", "sts3"}, _
{"name4", "address4", "telno4", "faxno4", "sts4"}}
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i, j As Integer
Dim x As Integer = 10
Dim y As Integer = 10
For i = 0 To 3
For j = 0 To 4
t(i, j) = New TextBox()
t(i, j).Location = New Point(x, y)
t(i, j).Text = fake(i, j)
Controls.Add(t(i, j))
x += 110
Next
y += 25
x = 10
Next
End Sub
if not, sorry.