ISBevel.Shape

Description

The shape of the specified bevel.

Syntax

object.Shape

Part	Attribute	Type	Description
`object`	Required	ISBevel	The `object` always implements the ISBevel interface

Return Value

TSShape

Example

Display some information about the specified bevel, including its shape.

Dim aBevel
Dim aBevelInfo

Set aBevel = Form.Controls_("Bevel2")

aBevelInfo =_
  "Caption: " & aBevel.Caption & vbNewLine &_
  "ShortName: " & aBevel.ShortName & vbNewLine &_
  "TypeName: " & aBevel.TypeName & vbNewLine &_
  "Width: " & aBevel.Width & vbNewLine &_
  "Height: " & aBevel.Height & vbNewLine &_
  "Left: " & aBevel.Left & vbNewLine &_
  "Top: " & aBevel.Top & vbNewLine &_
  "Style: " & aBevel.Style & vbNewLine &_
  "Shape: " & aBevel.Shape & vbNewLine &_
  "Style: " & aBevel.Style & vbNewLine                                                     
  
Profile.MsgBox(aBevelInfo)

Note: This macro should be executed in any event handler of the form control.

In Profile Client v8 on User Interface Shape can be found in Maintain > Templates > Health Record Collection Templates > Open the selected form template > Open form editor > Object Inspector > Select the bevel in the controls tree > Properties > Shape.

Version information

Added in v7.8.0