[align=left]Public Sub Main()
Dim x, z, y As Integer

Print " Dame un numero"
Input x
Repeat
z = x Mod 10
y = y + z
Until z = 0
Print y
End

Se lo que tengo que hacer, pero no se como plantearlo en el codigo.
LO que trato de hacer es que el numero que pida lo divida entre 10 y el residuo lo sume asi con cada una de las cifras del numero que ingrese. Pero no se como ponerlo en el programa, me podrian ayudar, por favor
Gracias

Una pregunta: porqué escribes en esta sección "Sobre Gambas-es" del foro ?  

Hola.

A bote pronto veo un fallo gordo. Ten en cuenta que la variable "x" nunca cambia dentro del bucle, eso quiere decir que el resto de la división siempre será el mismo y por lo tanto nunca saldrá del bucle.
 Otro problema que veo es la variable "x" que es un string, no un integer. Tendrías que hacer una conversión.

Espero que te sirvan las pistas que te he dado.
Un saludo.