Вывод текста в консоль - VB
Формулировка задачи:
Я хочу запустить через консоль MS-DOS скомпилированную VB программу.
Она должна вывести в консоль текст.
(нечто вроде команды printf на С++)
Как реализовать кодом VB, какие настройки?
P.S. Добавлю: надеюсь такой проект не будет ограничен в возможности
получать доступ к API-функциям.
(Хочу немного переделать код - "перехват консольного вывода" под чисто консольные нужды).
Решение задачи: «Вывод текста в консоль»
textual
Листинг программы
Private sinp As Scripting.TextStream Private sout As Scripting.TextStream Private serr As Scripting.TextStream Private myFSO As Scripting.FileSystemObject Sub Main() Set myFSO = New Scripting.FileSystemObject Set sinp = myFSO.GetStandardStream(CLng(0)) Set sout = myFSO.GetStandardStream(CLng(1)) Set serr = myFSO.GetStandardStream(CLng(2)) For i% = 1 To 10 sout.WriteLine "i=" + CStr(i%) Next i% sout.WriteLine "Press Enter to exit" Stri$ = sinp.ReadLine End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д