Count (Run-Time Designer)

Returns the number of selected objects in the collection.

Syntax

object.Count()

Example

'SelChange event handler
Private Sub ARDesigner1_SelChange()
	If ARDesigner1.SelectedObjects.Count = 1 Then
		StatusBar1.Panels(1).Text = ARDesigner1.SelectedObjects(0).Name
	Else
		StatusBar1.Panels(1).Text = ""
	End If
End Sub