Разбиение числа пробелами на разряды - VB

Узнай цену своей работы

Формулировка задачи:

Маленький вопросик, не мог найти примера но где-то давно попадалось уже.. как разбить число к примеру: 123456789 на 123 456 789 ? ну или 123:456:789 определенно через каждые три цифры..

Решение задачи: «Разбиение числа пробелами на разряды»

textual
Листинг программы
Function F(Num, Optional Delim = " ") As String
F = IIf(Num < 0, "-", "") & Replace$(Trim$(Format$(Abs(Num), Left("### ### ### ### ### ### ### ### ### ###", Len(Abs(Num)) + (Len(Abs(Num)) - 1) \ 3))), " ", Delim)
End Function

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 4 из 5
Похожие ответы