读文件，取出后发现少了一个字节，这是怎么回事？

wanyanfeng

我自定义如下：
Type fle_2
  aa(23)    As Integer
  bb(23)   As Integer
  cc(23)  As Integer
  dd(23)  As Integer
。。。。。
。。。。
End Type
                         注：     '''''''''''''''''''''以上共352字节
Type str_Message
  strMessage     As String
End Type

Public FleThr       As fle_2
Public FleThrO      As str_Message


然后读文件：
    Open strfPaht For Binary As #1
         Get #1, 1, FleThr
         Get #1, 352, FleThrO
    Close #1


问题是FleThrO.strMessage中存取的数据  第一位没有了，不见了


请问这是为什么呢？

先谢谢喽

wsj537

Get #1, 1, FleThr
改成
Get #1, 0, FleThr

wanyanfeng

楼上：
   跟以前一样的效果啊

wsj537

你第一个字节是什么内容
是不是空的？

wanyanfeng

FleThrO.strMessage  中的第一个字节转换成字符型是“M”  不是空

深渊的尽头

Open strfPaht For Binary As #1
         Get #1, 1, FleThr    ''既然已经读了352个字节，那
         Get #1, 352, FleThrO  ''下面是不是应该从353开始读了。
    Close #1

wanyanfeng

楼上：
   刚开始 我也是从  353 开始读的，可是那样出来后，是少2个字节。
   从352开始，就少1个字节。
   从351开始，就什么都没有啦

深渊的尽头

干脆什么都不用试试，如果这样也出问题，可能是你写数据时出错了。

Open strfPaht For Binary As #1
         Get #1, , FleThr    ''既然已经读了352个字节，那
         Get #1, , FleThrO  ''下面是不是应该从353开始读了。
    Close #1

yoh2006

Type str_Message
  strMessage     As String
End Type
应该跟这个定义有关系，strMessage如果是定长字符串应该不会发生这个问题
使用变长字符串，有可能会把第一个字符当成长度描述符解释，因此会丢掉第一个字符

fan3786

Type str_Message
  strMessage()     As byte
End Type

Public FleThr       As fle_2
Public FleThrO      As str_Message


然后读文件：
    Open strfPaht For Binary As #1
         Get #1, 1, FleThr
         Get #1, 1+len(FleThr), FleThrO.strMessage
    Close #1