After reading the file, I found that one byte is missing. What is going on?

wanyanfeng

I customize as follows:
Type fle_2
  aa(23) As Integer
  bb(23) As Integer
  cc(23) As Integer
  dd(23) As Integer
. . . . .
. . . .
End Type
                         Note: 352 bytes above'''''''''''''''''''''
Type str_Message
  strMessage As String
End Type

Public FleThr As fle_2
Public FleThrO As str_Message


Then read the file:
    Open strfPaht For Binary As #1
         Get #1, 1, FleThr
         Get #1, 352, FleThrO
    Close #1


The problem is that the first bit of the data accessed in FleThrO.strMessage is gone and gone.


Excuse me, why is this?

Thanks in advance

wsj537

Get #1, 1, FleThr
Change to
Get #1, 0, FleThr

wanyanfeng

upstairs:
   Same effect as before

wsj537

What's your first byte
Is it empty?

wanyanfeng

The first byte in FleThrO.strMessage converted into a character type is "M" and not empty

深渊的尽头

Open strfPaht For Binary As #1
         Get #1, 1, FleThr''Since 352 bytes have been read, then
         Get #1, 352, FleThrO''Is it supposed to start from 353?
    Close #1

wanyanfeng

upstairs:
   At the beginning, I also started reading from 353, but after that, it was 2 bytes less.
   Starting from 352, there is 1 byte less.
   Starting from 351, there is nothing

深渊的尽头

You don't have to try anything at all. If this is a problem, you may have made an error while writing the data.

Open strfPaht For Binary As #1
         Get #1,, FleThr''Since 352 bytes have been read, then
         Get #1,, FleThrO''Is it supposed to start from 353?
    Close #1

yoh2006

Type str_Message
  strMessage As String
End Type
It should be related to this definition. If strMessage is a fixed-length string, this problem should not occur
Using variable length strings, it is possible to interpret the first character as a length descriptor, so the first character will be lost

fan3786

Type str_Message
  strMessage() As byte
End Type

Public FleThr As fle_2
Public FleThrO As str_Message


Then read the file:
    Open strfPaht For Binary As #1
         Get #1, 1, FleThr
         Get #1, 1+len(FleThr), FleThrO.strMessage
    Close #1