Código:
Do
ShockwaveFlash1.SetVariable "_root." + txtruta2, txtval2
Loop
Do While <Condicion>
Loop
O...
Do
Loop While <Condicion>
O...
Do Until <Condicion>
Loop
O...
Do
Loop Until <Condicion>
Pero ...
Do
Loop
Se traba ...
http://msdn.microsoft.com/library/spa/default.asp?url=/library/SPA/vbcn7/html/vaconusingdoloop.asp