Writing memory data in VB.NET

Dim Game As Process = Process.GetProcessesByName("ac_client")(0)
    Dim base As String

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load


        For Each PP As System.Diagnostics.ProcessModule In Game.Modules

            If PP.FileName.Contains("ac_client.exe") Then
                Label1.ForeColor = Color.Green
                base = PP.BaseAddress
                Label1.Text = base
            End If
        Next

    End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim address As String
        address = ("&H" & Label1.Text) + &H98544
        Label1.Text = address
        Try
            WriteDMAInteger("ac_client", address, Offsets:={&HF8}, Value:=100, Level:=1, nsize:=4)
        Catch
        End Try

    End Sub