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