Квин-программа, или программа, печатающая свой исходный текст - VB
Формулировка задачи:
Задаю этот вопрос под влиянием
этой темы
и предлагаю решение:А ваш вариант?
Решение задачи: «Квин-программа, или программа, печатающая свой исходный текст»
textual
Листинг программы
Sub Main() s = "Sub Main()* s = ?* Debug.Print Replace(Replace(s, Chr(42), vbNewLine), Chr(63), Chr(34) & s & Chr(34))*End Sub" Debug.Print Replace(Replace(s, Chr(42), vbNewLine), Chr(63), Chr(34) & s & Chr(34)) End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д