生成验证码图片的代码。请问如何控制生成图片的位置？

Private Sub CreateValCodeImage(ByVal StrCode As String)
        If StrCode = Nothing And StrCode = String.Empty Then Return        Dim image As System.Drawing.Bitmap = New System.Drawing.Bitmap(Convert.ToInt32(Math.Ceiling(StrCode.Length) * 12.5), 22)        Dim g As Graphics = Graphics.FromImage(image)
        'g.DrawImageUnscaled(image, 0, 0)        Try
            Dim myRandom As New Random
            g.Clear(Color.White)
            'g.TranslateTransform(0, 0)            'For i As Integer = 0 To 24
            '    Dim x1 As Integer = myRandom.Next(image.Width)
            '    Dim x2 As Integer = myRandom.Next(image.Width)
            '    Dim y1 As Integer = myRandom.Next(image.Height)
            '    Dim y2 As Integer = myRandom.Next(image.Height)
            '    g.DrawLine(New Pen(Color.Silver), x1, y1, x2, y2)
            'Next            Dim myFont As Font = New System.Drawing.Font("Arial", 12, (System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic))
            Dim myBrush As Brush = New System.Drawing.Drawing2D.LinearGradientBrush(New Rectangle(0, 0, image.Width, image.Height), Color.Blue, Color.DarkRed, 90.0F, True)
            g.DrawString(StrCode, myFont, myBrush, 2, 2)            For i As Integer = 0 To 99
                Dim x As Integer = myRandom.Next(image.Width)
                Dim y As Integer = myRandom.Next(image.Height)
                image.SetPixel(x, y, Color.Black) '.FromArgb(myRandom.Next()))
            Next
            g.DrawRectangle(New Pen(Color.Silver), 0, 0, image.Width - 1, image.Height - 1)            Dim ms As New System.IO.MemoryStream
            image.Save(ms, System.Drawing.Imaging.ImageFormat.Gif)
            Response.ClearContent()
            Response.ContentType = "image/Gif"
            Response.BinaryWrite(ms.ToArray())
            ms.Close()
            g.Dispose()
            image.Dispose()
        Catch ex As Exception        Finally
            g.Dispose()
            image.Dispose()
        End Try
    End Sub