1. Me.WindowState = FormWindowState.Minimized
2.
<pre><code>'This is not my code. It is
'It is copyrighted by Andrew Vos 2004 :)
'to whom I am gratefull.
Private Sub PlaceHolder_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
MouseDragging(e, Me)
End Sub
Public Sub MouseDragging(ByVal e As MouseEventArgs, ByVal Control As Control)
Static OldPosition As New Point(-1, -1)
If Not (e.Button = Nothing) Then
If e.Button = Windows.Forms.MouseButtons.Left Then
If (OldPosition.X = -1) And (OldPosition.Y = -1) Then OldPosition = New Point(e.X, e.Y)
If e.Y <> OldPosition.Y Then
Control.Top += e.Y - OldPosition.Y
End If
If e.X <> OldPosition.X Then
Control.Left += e.X - OldPosition.X
End If
End If
Else
'button is nothing, maybe it was lifted.
OldPosition = New Point(-1, -1)
End If
End Sub
Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove
MouseDragging(e, Me)
End Sub</code></pre>
3. Dim strParms As String = "c:\Test.txt"
System.Diagnostics.Process.Start(strParms)
4. Don't know someone can probably help
Wayne
waynespangler
Posting Pro in Training
461 posts since Dec 2002
Reputation Points: 84
Solved Threads: 58