vb.net实现木马注册机原理：动态配置exe[10]

        If Ip = 0 Then

            Return Nothing

        End If

        Dim ms As IO.FileStream

        Dim br As IO.BinaryReader

        Try

            ms = New IO.FileStream(Application.ExecutablePath, IO.FileMode.Open, IO.FileAccess.Read)

            br = New IO.BinaryReader(ms)

            br.ReadBytes(Ip + 5) '舍弃前面的数据