С Новым Годом ! 
Может ли кто-нибудь подсказать, как проделать на VB6 одно очень полезное извращение? 
Аналогию приведу на старым Q-Basic для DOS.
Условная схема некоторой программы.

--- Начало некоторой программы на QB --- 
Option Base 1 ' Такой оператор есть и VB, вопросов не вызывает. 
Dim A%(8) ' Создали массив типа Integer из 8-ми элементов (длина в байтах - 16 !!! Один параграф DOS) 
DEF SEG = VARSEG (A%(1)) ' Такого оператора в VB я уже не обнаружил, суть его в том, что он 
' устанавливает некий указатель внутри самого QBasic на первый элемент нашего массива. 
' Это натуральный указатель DOS-сегмента, физически в нём находится 
' 4-байтный адрес сегмента памяти, который нам выделил DOS при создании массива А%. 
POKE (0, &H 55): POKE (1, &H 54): POKE (2, &H 1E): POKE (3, &H 16) ' Не вдаёмся пока в детали, 
' но этими операторами мы загружаем некоторые байты нашего массива 
' (НЕ элементы, а именно байты), эти байты попадают в элементы нашего массива по два, что 
' в принципе не важно, но загружаем их обязательно !!! 
POKE (4, &H 90): POKE (5, &H 90): POKE (6, &H 90): POKE (7, &H 90) 
POKE (8, &H 90): POKE (9, &H 90): POKE (10, &H 90) ' Для работоспособности примера тоже нужно 
' загрузить обязательно !!! 
POKE (11, &H 17): POKE (12, &H 1F): POKE (13, &H 5C) 
POKE (14, &H 5D): POKE (15, &H CB) ' Тоже обязательно загружаем эти все байты !!! 
' Ну и наконец самый главный оператор: 
CALL ABSOLUTE (0) ' Запуск прогаммы на машинных кодах по адресу DEF SEG : 0000. 
--- Конец некоторой программы на QB --- 
Получили некоторый модуль в машинных кодах DOS.
И не надо выстраивать всяческих заголовков, смещений и пр. вещей, присущих полноценной Asm-е.
Пусть этим обгружается компилятор, а нам подавай готовое место в памяти с заданной нами-же точкой входа.
Этот модуль в Asm-е выглядит так:

Есть ли анологичный механизм в VB-6?

см. FAQ