C#

  Dim mousePath As New System.Drawing.Drawing2D.GraphicsPath()<br />
   Dim SelectRect As New Rectangle()<br />
    Dim ps As New Point()<br />
    Dim pe As New Point()<br />
    Private Sub PictureBomcp1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pbImage.MouseDown<br />
        SelectRect.Width = 0<br />
        SelectRect.Height = 0<br />
        SelectRect.X = e.X<br />
        SelectRect.Y = e.Y<br />
        ps.X = e.X<br />
        ps.Y = e.Y<br />
        pe = ps<br />
        If e.Button = Windows.Forms.MouseButtons.Left Then<br />
            mousePath.StartFigure()<br />
        End If<br />
<br />
    End Sub<br />
<br />
    Private Sub PictureBomcp1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pbImage.MouseMove<br />
        If (e.Button = MouseButtons.Left) Then<br />
            Dim thisform As PictureBox = CType(sender, PictureBox)<br />
            Dim g As Graphics = thisform.CreateGraphics()<br />
            mousePath.AddLine(e.X, e.Y, e.X, e.Y)<br />
            g.DrawPath(New Pen(MyConstants._C, MyConstants._W), mousePath)<br />
        End If<br />
    End Sub<br />
<br />
    Private Sub PictureBomcp1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pbImage.MouseUp<br />
        Dim thisform As PictureBox = CType(sender, PictureBox)<br />
        Dim g As Graphics = thisform.CreateGraphics()<br />
        Dim p As New Pen(MyConstants._C, MyConstants._W)<br />
        g.DrawPath(New Pen(MyConstants._C, MyConstants._W), mousePath)<br />
        mousePath.Reset()<br />
        g.Dispose()<br />
    End Sub

 System.IntPtr  PrHndle;<br />
 Process Prc = new Process();<br />
 <br />
 Prc.StartInfo.FileName = VS6EXEPath;<br />
 Prc.StartInfo.Arguments = WorkSpace + CompileCommandString;<br />
 Prc.StartInfo.UseShellExecute = false;<br />
 Prc.StartInfo.RedirectStandardOutput=true;<br />
 <br />
 Prc.Start();<br />
 PrHndle = Prc.Handle;<br />
 <br />
 StreamReader SR = Prc.StandardOutput;<br />
<br />
 while (SR.EndOfStream != true)<br />
 {<br />
     rtbCmdOutput.Text = rtbCmdOutput.Text + "\r\n" + SR.ReadLine();<br />
 }<br />
 Prc.WaitForExit();