Importante

Você está vendo a versão anterior da nova experiência da Alura que estamos preparando para você. Em breve, ela ganha uma identidade visual novinha totalmente pensada em potencializar seus estudos!

0
respostas

certo isso? Convertendo While para For

Sub Main()

    Dim Contador As Integer = 1
    Dim Saida As String = ""
    For Contador To 10 
        Saida += " - " + Contador.ToString
   Next
    MsgBox(Saida)

End Sub