Loop Through textbox name variance Variable Value

http://www.ozgrid.com/forum/showthread.php?t=26982

For i = 1 To 3
Me.Controls("TextBox" & i) = .Offset(i, 0).Value
Next