Examples: Width property (window)

The following event procedure runs when the Customer Maintenance window opens. The event procedure checks if the Reminders window is open, then uses the Width and Left properties for the Reminders window to position the Customer Maintenance window to the right and below:

Private Sub Window_BeforeOpen(OpenVisible As Boolean)
	If Reminders.Visible = True Then
		'The Reminders window is open
		CustomerMaintenance.Left = Reminders.Left + 50
		CustomerMaintenance.Top = Reminders.Top + 50
	End If
End Sub

Documentation Feedback