Open "C:\abc.abc" For Binary As 1
ReDim m(1 To y) As Byte '定义为读取长度的数组
Get #1, x, m() '从x位置开始，取y长度数据。
Close 1
Dim m() As byte
'x=
'y=
Open "C:\abc.abc" For Binary As 1
ReDim m(1 To y)
Get #1, x, m()
Close 1
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024