чтение файла блоками по 300 байт

Здравствуйте! Нужна помощь. В бейсике не силен. На VB6 нужно:
1. определить буфер размером в 320 байт.
2. открыть файл на чтение в бинарном режиме
3. считать из файла 320 байт.
4 сделать задержку на 1 сек после чего очистить буфер и считать следующие 320 байт
и так до конца файла.

шарюсь в интернете уже несколько дней, на VB6 ни чего не нашел. Будте добры, покажите на примере как это делается.