CimEvent.OleParmsCount (read-only property)

Obsolete Replaced by a GefEventContext
Syntax CimEvent.OleParmsCount
Description Returns an Integer representing the number of parameters from an event fired from an ActiveX control. This is only valid if the event type is CIM_ET_OLE_EVENT.
Example 

                Dim
                Ev As CimEvent
                Dim var As Variant
                Set Ev = CimGetEvent()
                If Ev.Type = CIM_ET_OLE_EVENT Then
                ????Count% = Ev.OleParmsCount
                ????Index% = 0
                ????While Index% < Count%
                ????????var = Ev.GetOleParm(Index)
                ????????'Do Stuff with the parameter.
                ????Wend
                End If