CSVにアクセスする方法がなんでもいいなら別の方法をすすめるが
その方法じゃないとダメならSQLを変えてみてはどうでしょうか〜

rsDB.Source = "SELECT ID, STR(TEL) FROM テーブル"