Description

Returns, as a Boolean value, the value of the attribute attributeName of the object obj.

Syntax

obj

the object, to read the attribute attributeName from

attributeName

the name of the attribute to be read from the object obj.

Called from

 

Code

  <Extension()> _

  Public Function GetBoolean(ByVal obj As IGenericAttrObj, ByVal attributeName As String) As Boolean

    Dim value As Object

    Dim found As Boolean

    value = GetAttributeBase(obj, attributeName, found)

    If found Then

      Return CType(value, Boolean)

    End If

    Return Nothing

  End Function

Examples

  <Extension()> _

  Public Function Counted(ByVal obj As IGenericAttrObj) As Boolean

    Return GetBoolean(obj, "counted")

  End Function

See also

GetInteger, GetString, GetDecimal, GetDate, GetXmlDocument, GetDataContent

GetAttributeBase Function