GetObjectContext Function, CreateInstance Method Example

Dim ctxObject As ObjectContext
Dim objAccount As Bank.Account

' Get the object's ObjectContext.
Set ctxObject = GetObjectContext()

' Use it to instantiate another object.
Set objAccount = _
    ctxObject.CreateInstance("Bank.Account")