' Create the Main method for the program.
' Declare a number of variables. TheForm represents the form, while the
' other variables are values we will read from the form.
Dim TheForm As IFormNodeP
Dim BirthYear As Integer
Dim BirthMonth As Integer
Dim BirthDay As Integer
' The program's Main consists of a number of calls to other functions.
Set TheForm = LoadForm
BirthYear = GetBirthYear(TheForm)
BirthMonth = GetBirthMonth(TheForm)
BirthDay = GetBirthDay(TheForm)
SetBirthYear BirthYear, TheForm
SetBirthMonth BirthMonth, TheForm
SetBirthDay BirthDay, TheForm
' Free the memory in which the form was stored.