Adjusts the z-order of the object. | |
Syntax: | object.ZOrder Order |
Parameters: |
Order As
GefZOrderEnum -
|
Description: | Order is one of gefZOrderToBack,
gefZOrdeBackward, gefZOrderForward,
gefZOrderToFront. Example: Sub GefObject_ZOrder() Dim oCimObj As GefObject Dim oCimDupObj As
GefObject Set oCimObj = CimGetObject Set oCimDupObj =
oCimObj.Duplicate("DuplicateObject",
CimGetScreen.object) oCimDupObj.Left = (500 * Rnd) *
20 oCimDupObj.Top = (500 * Rnd) *
20 CimGetScreen.Refresh False oCimDupObj.ZOrder
gefZOrderToFront CimGetScreen.Refresh False End Sub |