In diesem Beispiel wird die OnAction-Eigenschaft für die zweite Form einer Shapes-Auflistung festgelegt. Falls die Variable ss kein Shapes-Objekt darstellt, schlägt dieses Beispiel fehl.
ss.Item(2).OnAction = "ShapeAction"