DynPicture.Move



Move(Left As Long,Height As Long,Top As Long,Width As Long)

Parameters

Left As Long
New position for left border.
Height As Long
New height of picture.
Top As Long
New position for upper border.
Width As Long
New width of picture.
ED
avaliable
RT
avaliable

Remarks

This property moves the picture to a new position. The parameters include the new position of the picture.

Hint: After this method UpdateAll should be executed to redraw the picture.

Sample:

The following VBA example moves the current picture to the bottom and to the right by 10 pixels.


'*** The current picture is moved by 10 pixel/side (top,bottom,left,right)
Public Sub LeftClickUp_Picture_Move(obElem As Element)
	Dim obPicture As DynPicture

	'*** Get picture-object
	Set obPicture = obElem.Parent.Parent
	If (obPicture Is Nothing) Then
		MsgBox "Error: Picture-object is invalid..."
		Exit Sub
	End If

	'*** De/-activate the current picture
	obPicture.Move obPicture.Left + 10, obPicture.Top + 10, obPicture.Width, obPicture.Height
	obElem.LeftClickUp
End Sub

See Also

DynPicture