Il tuo codice non funziona bene.
Francamente ti consiglio di usare GetValue() al posto di GetString() perchè come fai ad essere sicuro che quelle colonne sono di tipo stringa?

Con GetValue() non importa quale tipo sia, e restituisce in ogni caso il valore.
Infatti con GetString() mi da errore, con GetValue() no.

Esempio:

codice:
results = results & myReader.GetValue(0).ToString & vbTab & myReader.GetValue(1).ToString & vbLf


Il fatto che ti restituisca l'errore
Indice oltre i limiti della matrice.
non te lo so spiegare, potrebbe essere dovuto al tipo di dato di quella colonna.

P.S. Considera anche l'eventualità di valori nulli.