How to set values for textboxes that is not visible

[dglienna]

If your data were only this big:

axx.Text = Sin(angle.Text * converter)
ayx.Text = Round(Cos(angle.Text * converter), 2)
azx.Text = Round(Cos(angle.Text * converter), 2)
ac1.Text = 0
axy.Text = Round(Cos(angle.Text * converter), 2)
ayy.Text = Round(Cos(angle.Text * converter), 2)
azy.Text = Sin(angle.Text * converter)
ac2.Text = 0


Looks like you have 4 erlements in the array, and in this case, 2 items.
While you can store a 2-dimensional array both ways, it's better to declare it the way it's going to be used.

In this case:

Dim txt(1,3) as String ' arrays start with (0,0)

So, a loop thru:

Dim r as Integer, c a Integer
for r = 0 to Ubound(txt,1) - 1
  for c = 0 to Ubound(txt,2) - 1
    msgbox(txt(r,c))
  next c
next r