如何正確讀取隨機檔?(編號：658)

請問大家..我有資料在隨機檔如下:
A　　　　　　　　　　　B　　　　　　　　　　C　　　　
10BYTE　　　　　7BYTE　　　　　4BYTE
請問
若我要正確讀寫該檔的資料該如何寫?
我用了VBHELP跟瓜瓜兄的寫法都不行..
(瓜瓜兄的用法 vb跟我說必須是陳述式結尾
我的用法也是如此,如下:
type　mydata
dim　aa as byte*10
dim bb as byte *4
dim　cc as　byte*
end type
private sub ccmdaa_click()
i=1
dim mytype as mydata
open d:\test.dat　for random as　#1
do while not eof(1)
strkk= get #1,i, lenb(mytype)
list1.additem　strkk
i=i+1
loop
end sub