Can somebody please post a script which has...
buttons that move a picture or icon around the screen
when the icon or picture touches something a MsgBox appears
please? no? go on? cheers ;)
Printable View
Can somebody please post a script which has...
buttons that move a picture or icon around the screen
when the icon or picture touches something a MsgBox appears
please? no? go on? cheers ;)
This will give you something to play with. This code is very basic and could be coded more efficiently, but will demonstrate simple movement.
Size a form at 7995 width x 7680 height
Place a small image 480 x 480 and set TOP to 5640
and LEFT to 480.
Add commmand button and use the following code for it
(This is a continuous loop by using the label continue:)
code...
continue:
'move bottom left to bottom right
Do
img1.Left = img1.Left + 2 '2 sets the speed
DoEvents
Loop Until img1.Left = 7200
'This should give you some ideas
If img1.Left = 7200 Then
MsgBox "Ouch", , "Title"
End If
'move bottom right to top right
Do
img1.Top = img1.Top - 2
DoEvents
Loop Until img1.Top = 360
'move top right to top left
Do
img1.Left = img1.Left - 2
DoEvents
Loop Until img1.Left = 120
'move top left to bottom left
Do
img1.Top = img1.Top + 2
DoEvents
Loop Until img1.Top = 5640
'move bottom left to top right
Do
img1.Move img1.Left + 2, img1.Top - 2
DoEvents
Loop Until img1.Top = 360: 'shp1.Left
'move top right to centre
Do
img1.Move img1.Left - 2, img1.Top + 2
DoEvents
Loop Until img1.Left = 2200
'move centre to right
Do
img1.Left = img1.Left + 2
DoEvents
Loop Until img1.Left = 5200 '**
'move right to top
Do
img1.Top = img1.Top - 2
DoEvents
Loop Until img1.Top = 360
'move top to left
Do
img1.Left = img1.Left - 2
DoEvents
Loop Until img1.Left = 120
'move top left to bottom left
Do
img1.Top = img1.Top + 2
DoEvents
Loop Until img1.Top = 5640
'go through the loops again when the image
'has reached the start position
If img1.Left = 120 Then GoTo continue
Experiment and above all have FUN
GRAHAM
cheers graham! that was quite a help..
is there any way i can make the image move manually? so like when you press left the image moves left one?