Description
Creates a new view with the given coordinates, adds it to the model, and returns the new view to the caller. PARAMETERS: HorizontalPosition as Integer, VerticalPosition as Integer.
Syntax
Public Function Add(_ ByVal HorizontalPosition As Variant,_ ByVal VerticalPosition As Variant _ ) As View
Parameters
HorizontalPosition
VerticalPosition
Example
Dim MyModel As Model
Dim MyView As View
Dim HorizPo As Integer
Dim VertPo As Integer
' Setting horizontal and vertical position for the new view
HorizPo = 100
VertPo = 100
Set MyView = MyModel.Views.Add(HorizPo, VertPo)
See Also
- Views Collection
- View Object