類似以下流水號方式的隨機檔，有更簡單的寫法嗎?
Open TheFileName For Random As #1 Len = 40
Get #1, 1, INFO.txt1
Get #1, 2, INFO.txt2
Get #1, 3, INFO.txt3
Get #1, 4, INFO.FILE
..........
.......
....
Get #1, 201, INFO.D95
Get #1, 202, INFO.D96
Get #1, 203, INFO.D97
Get #1, 204, INFO.D98
Get #1, 205, INFO.D99
Get #1, 206, INFO.D100
Close #1