Simple no recoil source code.

Imports System.Runtime.InteropServices

Public Class Form1

    <DllImport("kernel32.dll")>
    Private Shared Function WriteProcessMemory(ByVal hProcess As IntPtr, ByVal lpBaseAddress As IntPtr, <[In](), Out()> ByVal buffer As Byte(), ByVal size As UInt32, ByRef lpNumberOfBytesWritten As IntPtr) As Int32
    End Function

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim Buffer As Byte() = New Byte() {&H90, &H90, &H90, &H90, &H90}
        WriteProcessMemory(Process.GetProcessesByName("IW5MP")(0).Handle, New IntPtr(&H427029), Buffer, UInt32.Parse(Buffer.Length), IntPtr.Zero)
    End Sub
End Class