Do .. Loop Until. Ejemplo Dim rdo As Long Dim dig As Long
{"Image DocumentName": "Do .. Loop Until. Ejemplo Dim rdo As Long Dim dig As Long", "Image ImageDescription": "rdo = InputBox( introduce un n\u00famero ) dig = 0. Do. dig = dig + 1. rdo = rdo \\ 10. Loop Until rdo=0. MsgBox (dig) LSI.", "Image XResolution": "37", "Image YResolution": "37", "Image ResolutionUnit": "Pixels/Centimeter", "Image Software": "SlidePlayer", "Image YCbCrPositioning": "Centered"}