Private Sub LRbtn_Click(sender As Object, e As EventArgs) Handles LRbtn.Click
OpenFileDialog1.Title = "Please Select a File"
OpenFileDialog1.ShowDialog()
Dim filename As String = OpenFileDialog1.FileName
Dim fs As FileStream = New FileStream(filename, FileMode.Open)
Dim br As BinaryReader = New BinaryReader(fs)
br.BaseStream.Seek(verOffset, SeekOrigin.Begin)
a = br.ReadInt32()
verLabel.Text = hex2ascii(Hex(a))
br.Close()
fs.Close()
End Sub
ファイルを開いてバイナリ読み取りを行っていると、指定されたアドレスで 4 バイトを読み取ります。
したがって、たとえば、変数はHex に変換されたものであるa
可能性があります1163022402
45,52,50,42
a
16進数に変換した後、バイトを逆にして取得する必要があります42,50,52,45
VB は初めてで、学習中です。どうすればよいですか? ありがとうございました!