ISProfile.CreateOutputWindow

Description

This function creates the output window for the selected patient.

Syntax

object.CreateOutputWindow()

Part Attribute Type Description
object Required
The object always implements the ISProfile interface

Return Value

ISOutputWindow

Returns the output window for the selected patient.

Example

Create the output window with some added information about the selected patient.

Dim aPatient
Dim aOutputWindow

Set aPatient = Profile.SelectPatient
set aOutputWindow = Profile.CreateOutputWindow 

aOutputWindow.Caption = "Information about " & aPatient.SurnameFirstName 
aOutputWindow.Height = 300 
aOutputWindow.Width = 400

aOutputWindow.AddText("First Name:" & vbTab & aPatient.FirstName) 
aOutputWindow.AddText("Surname:" & vbTab & vbTab & aPatient.Surname)
aOutputWindow.AddText("DOB:" & vbTab & vbTab & aPatient.DOB)
aOutputWindow.AddText("Sex:" & vbTab & vbTab & aPatient.Sex) 
Note:

Version information

Added in v7.8.0