Перенос строк. Visual basic - VB
Формулировка задачи:
Сделать так, чтобы в строке находилось максимум 64 символа, если больше, то остальной текст переносится на новую строку и так до конца.
Решение задачи: «Перенос строк. Visual basic»
textual
Листинг программы
Sub bb() Dim s$, i&, j& s = "Сделать так, чтобы в строке находилось максимум 64 символа, если больше, то остальной текст переносится на новую строку и так до конца." Debug.Print Space(64) & "|<< контроль" Do j = InStrRev(s, " ", i + 65) If j Then Debug.Print Mid$(s, i + 1, j - i - 1) Else Debug.Print Mid$(s, i + 1) Exit Do End If i = j Loop End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д