MODULES

[MMX//ALEX]

Кто-нить знает, как добавить мудуль во время выполнения программы.
Просто нужно для того, чтобы:
Есть файл a.txt:

exit
sbfg
asd

И есть модули с названиями строчек в этом файле. Загрузить с самого начала модули не могу, т.к. в файле строчек не определенное кол-во.

Заранее спасибо!

[ANDLL]

Чего-то не очень понятно...
Что находится в файле a.txt?
Если ты хочешь вставить кусок кода на VB во время выполнения, то эта задача из области
И вообще что ты понимаешь под модулем??

[Tarik]

А для какой цели это всё делается? Уж не для плагинов ли?

[MMX//ALEX]

Объесняю...
Дерево следующее:

Folder\a.txt
Folder\exit.bas
Folder\fgh.bas
Folder\qwe.bas

Содержимое a.txt:

exit
fgh
qwe

Прога должна использовать эти модули:
Folder\exit.bas
Folder\fgh.bas
Folder\qwe.bas

Так понятно?

И можно ли сделать тоже самое с формами(Form1.frm и т.д.)

[gaidar]

Хех. Что за глупость! Извинясь, но как тыхочешь загружать текстовые файлы (модули не модули - текст все). Уже скомпилированнаЯ программа не может таким образом загружать части кода.

Используй механизм plugin'ов. На форуме описан и не раз.

[_NeoN_]

Вот до чего доводят языки высокого уровня.. люди не знают как проги работают... ну ты открой exe файл блоктоном и посмотри что там... там же не код басика.. конечно выход есть... анпиши свой компилятор и живи спокойно!
ну что я могу сказать... делай из этих модулей dll'ки и потом подключай... пример есть на сайте, там про плагины что-то.. поищи

[ShadowCaster]

Так сделать можно, но функциональность будет уже не та:
- Добавь MS Script Control
- Каждый модуль содержит основной код в Sub Main()

Код (Script Control - "sc"):

Private Sub LoadModules(ByVal file_path as String)
dim buf as string

n = FreeFile
open file_path for input as #n
do until eof(n)
c=c+1
line input #n, ln
n2 = FreeFile
open ln for binary as #n2
buf = space(lof(n2))
get #n2,, buf
close #n2
buf = Replace(buf, "Sub Main()", "Sub Main_"+cstr(c)+"()") ' Во избежание тучи Main'ов
sc.AddCode buf
loop
close #n
End Sub

- Теперь в коде скрипт контрола сидят C кодов модулей.
- Sub Main() можно и не использовать, елси предполагаются разные ф-ции и вообще не предполагается моментальный их запуск.