[VB08] visualizzare tutti i risultati nella console

[Davon]

Troppo stanco per programmare seriamente, questa sera, mi sono inventato un esercizio banale: sommare tutti i multipli di 3 compresi tra 0 e 1000 (3+6 = 9, 9+9 = 18, 18+12 = 30, ecc.)


Detto in codice, ho scritto questo:

 Dim risultato = 0        
 Dim numero = 0          
For numero = 0 To 1000 Step 3           
  risultato = risultato + numero            
 Console.WriteLine(risultato.ToString)         
Next        
 Console.ReadLine()

Il problema è la "grandezza della console", se vogliamo. A programma/ciclo terminato, la console visualizza solo i risultati a partire da 1890. Gli altri....addio.
Ovviamente, prima di postare, ho controllato che fosse effettivamente così.
C'è un modo per risolvere l'inghippo, ovvero visualizzare tutti i risultati, inclusi quelli non visualizzati?

[MItaly]

Lancia il programma dal prompt dei comandi, redirigendo l'output su file con l'operatore >.