vb.net 教程 4-9 二进制文件读写 2

继续上一节讲解二进制文件的读写。

本节以实例的方式讲解二进制文件的读取。

请不要忘了加上 Imports System.IO

窗体设计如下：

按下“判断是否可执行文件”按钮时：

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click        Dim filename As String        If OpenFileDialog1.ShowDialog <> DialogResult.OK Then            Exit Sub        End If        filename = OpenFileDialog1.FileName        MessageBox.Show("这" & IIf(checkMZ(filename), "是", "不是") & "可执行文件")    End Sub

具体判断是否是可执行文件的代码：

    Private Function checkMZ(ByVal filename As String) As Boolean        Try            Dim fs As FileStream = New FileStream(filename, FileMode.Open)            Dim br As BinaryReader = New BinaryReader(fs)            Dim intMZSign As Int16 = br.ReadInt16       '检查可执行文件标志            br.Close()            fs.Close()            '检查是否是可执行文件标志            If Convert.ToString(intMZSign, 16).ToUpper = "5A4D" Then                Return True            Else                Return False            End If        Catch ex As Exception            Return False        End Try    End Function

说明

1、通常，可执行文件的标记第一个字节是：4D，对应ASCII表中的M，第二个字节是：5A，对应ASCII表中的Z。

MZ亦即可执行文件的Dos文件头，这是Windows下面的可执行文件为了兼容MS-Dos系统做的保留。

补充说明一下：如果是PE文件还需要判断PE头。请自行在网上搜索PE文件结构。

2、按照上面的说明，应该判断是否是 "4D5A“，但是实际代码中判断的是 ”5A4D“，这是因为存储的时高位在后的原因。

ReadInt16时，读取2个字节，读出来的数据为：23117，转换成16进制数就是 5A4D。

再例如：

按照一个字节一个字节的读取，读取了4个字节，按顺序依次是： 0A 0B 0C 00，那么对应的Int32值应该是：C0B0A(十六进制)、789258（十进制）。

相关知识请自行网上搜索相关知识。

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看vb.net 教程 目录