ISOutputWindow.Caption

Description

The caption of the output window.

Syntax

object.Caption

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

Return Value

string

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