Hi Everyone! :)
Hope someone can help me in this problem. :?:
Things I have:
Picturebox1 (Name: Block)
Timer1 (Interval: 100)
Label1, which has the MouseEnter event. The MouseEnter event is MoveToStart().
Panel1, which includes Picturebox1, Label1.
(The codes are at the bottom)
When Form1 debugs (runs), I click on Button1, which enables and starts Timer1. Picturebox1 (Block) starts moving right and then left and then right and then goes on. I have put a MouseEnter event on the Picturebox so when Picturebox1 is moving, and the mouse enters Picturebox1, a message box should appear. BUT, when Picturebox1 starts moving, Form1 stucks, message box doesn't appear, MouseEvent doesn't work, not on the Picturebox neither on Label1 and I have to stop the form from running. Label1 and Block (Picturebox1's name) are having the same MouseEnter event code which is MoveToStart(). MoveToStart()'s code is at the bottom.
Public Class Form1
Dim BlockX As Integer = 1
If Block.Location = New Point(4, 237) Then Do Until Block.Location = New Point(499, 237) Me.Block.Left = Me.Block.Left + BlockX If Block.Location = New Point(499, 237) Then Do Until Block.Location = New Point(4, 237) Me.Block.Left = Me.Block.Left - BlockX Loop End If Loop End If
I have put MoveToStart() in a label. And the label's MoveToStart() is Picturebox1's MouseEnter event.
MsgBox("You touched the line! Try again.", MsgBoxStyle.Information, "Line Touched!") Dim startingPoint As Point startingPoint.Offset(20, 28) Cursor.Position = PointToScreen(startingPoint) Panel1.Enabled = False Button1.Enabled = True
timer1.enabled = True Timer1.Start() Button1.Enabled = False Panel1.Enabled = True
I know this is very complicated and if you want any further information please reply, but ANY help will be highly appreciated, thanks for your time.