ISBevel.Style

Description

The style of the specified bevel.

Syntax

object.Style

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

Return Value

TSBevelStyle

Example

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

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 Style 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 > Style.

Version information

Added in v7.8.0