Adding example VB6 code dump