Дан текстовый файл, содержащий текст, выровненный по левому краю. Выровнять текст по центру - VB
Формулировка задачи:
Дан текстовый файл, содержащий текст, выровненный по левому краю. Выровнять текст по центру, добавив в начале каждой непустой строки нужное количество пробелов (ширину текста считать равной 50). Строки нечетной длины перед центрированием дополнять слева пробелом.
Решение задачи: «Дан текстовый файл, содержащий текст, выровненный по левому краю. Выровнять текст по центру»
textual
Листинг программы
- Function MidS$(ByVal S$, Optional W& = 50)
- MidS$ = Space$(W)
- Mid(MidS$, (W - Len(S) + 1) / 2 + 1) = S
- End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д