Страница: 1 |
Программеры, помогите чайнику советом. Из целочисленного массива извлекается элемент. Необходимо сложить составляющие этот элемент числа. Например извлечено 53. Надо сложить 5 и 3.
Переведи его в строку и посимвольно назад в число, где-то так: Dim k, l, r as Long Dim s as String k = 53'Текущий элемент s = CStr(k) For l = 1 To Len(k) r = CLng(Mid$(s, l, 1)) + r Next l Страница: 1 |
Вопрос: Обработка данных
Добавлено: 26.09.03 06:20
Автор вопроса: Жаконя | Web-сайт:
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
USA
Вопросов: 1
Ответов: 184
Профиль | | #1
Добавлено: 26.09.03 06:45