Results 1 to 3 of 3
  1. #1
    Join Date
    Nov 2013
    Location
    Somewhere in the universe
    Posts
    2

    Question Unanswered: How do i fix this?

    Public Class Form1
    Private Sub


    Button1_Click(ByVal sender As System.Object, Byval e As System.EventArgs) Handles Button1.Click
    MsgBox("Do not let the virus, aka the frowny face touch you")
    MsgBox("Are you ready?", MsgBoxStyle.YesNo)
    If vbYes form1 follow 'mouse'
    End Sub

    End Class


    Public Class Form2



    Private Sub image1(ByVal form1) '_Shadows(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles 'Form1'.MouseDown
    If MouseButtons() = Windows.Forms.MouseButtons.Right Then Dim cpos As Point = form1
    PointToClient(Cursor.Position)

    End Sub

    Private Function MouseButton() As MouseButtons
    Throw New NotImplementedException
    End Function

    Private Sub PointAtClient(ByVal point As Point)
    Throw New NotImplementedException
    End Sub

    End Class

    This is my program, where i try to get a picture aka form1 to follow the mouse, Could somebody fix it for me so it works and aste it back here?

  2. #2
    Join Date
    Jan 2007
    Location
    UK
    Posts
    11,434
    Provided Answers: 10
    What about it doesn't work?
    George
    Home | Blog

  3. #3
    Join Date
    Nov 2013
    Location
    Somewhere in the universe
    Posts
    2

    Question Identifier

    It wants an identifer '.'

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •