This property is True if the specified bevel is enabled.
object.Enabled
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISBevel interface |
bool
Display Enabled for the specified bevel.
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 &_
"Tag: " & aBevel.Tag & vbNewLine &_
"Enabled: " & aBevel.Enabled & vbNewLine
Profile.MsgBox(aBevelInfo)
In Profile Client v8 on User Interface Enabled cannot be found.