Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Другие темы раздела
VBA Resultset ничего не возвращает https://www.cyberforum.ru/ vba/ thread1622773.html
Всем доброго времени суток! Столкнулся с таким казуом, никогда такого не возникало.. Есть макрос, который запускается в аксессовском файле, данные берет из другого файла Dim conn As...
Пройтись по тексту, поменять местами слова VBA
Здравствуйте, дали лабораторную работу по Vba, не объяснив никаких основ( Стоит следующая задача: Найти самое длинное слово в тексте и поменять его местами с самым коротким. Выделить одно из них...
VBA Case if, задать несколько условий
Добрый вечер Private Sub WorkStarts() i1 = Worksheets("Универсальный расчёт").Cells(2, "U").Value i2 = Worksheets("Универсальный расчёт").Cells(3, "U").Value i3 = Worksheets("Универсальный...
VBA Как задать условие проверки того, что вводимое название листа уже есть в этой книге? (Да-да, я не шучу) Простецкую лабу по VBA нужно усложнить тем, чтобы в случае того, что при создании листа расчета и накладной вводится имя, которое уже раньше используется в листах - чтобы ПРОГРАММА выводила... https://www.cyberforum.ru/ vba/ thread1622620.html
VBA Численные методы.Контрольная работа https://www.cyberforum.ru/ vba/ thread1622499.html
Здравствуйте! Не могли бы вы мне помочь решить это задание? Нужно решить одним методом.
В заданном одномерном массиве целого типа найти те элементы, произведение цифр которых равно заданному числу VBA
В заданном одномерном массиве целого типа найти и напечатать те элементы, произведение цифр которых равно заданному числу a, или сообщить, что таких нет. Использовать процедуру нахождения...
VBA VBA
1.Подсчитать, сколько раз встречается введенное с клавиатуры слово, начиная со второго абзаца (считать, что слова в тексте разделены пробелами). 2.Удалить все латинские буквы, расположенные между...
VBA Цикл по всем файлам в папке Добрый день! Подскажите, пожалуйста, какой-нибудь несложный способ перебрать в цикле все книги в текущей папке. Например, чтобы перебрать все ячейки диапазона, можно использовать такую... https://www.cyberforum.ru/ vba/ thread1622277.html
VBA Вызов процедуры внутри функции и создание Combox на листе https://www.cyberforum.ru/ vba/ thread1622228.html
Всем доброго дня! Столкнулся с необходимостью создавать ComboBox на листе (как объект OLE или ActiveX листа, не объект формы) через вызов функции с листа. Второй проблемой стало применение ООП......
VBA Расшерение найденного текста Мне нужно найти в тексте заданное слово, при это расширить выделение слова на n слов влево и на n слов вправо. Это число тоже задано. И закрасить этот текст красным цветом. Я пока нашла только само... https://www.cyberforum.ru/ vba/ thread1622200.html
15018 / 6346 / 1725
Регистрация: 24.09.2011
Сообщений: 9,976
23.12.2015, 13:55 0

Определить, является ли число перевертышем с учетом четырех цифр

23.12.2015, 13:55. Просмотров 620. Ответов 2
Метки (Все метки)

Ответ


Shersh,
Цитата Сообщение от so_kissola Посмотреть сообщение
Например, такими числами являются 2222, 1661, 0440
Visual Basic
1
2
3
4
Function IsChangeling(N)
Dim s: s = Format(N, "0000")
IsChangeling = s = StrReverse(s)
End Function


Вернуться к обсуждению:
Определить, является ли число перевертышем с учетом четырех цифр
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.12.2015, 13:55
Готовые ответы и решения:

Выяснить, является ли число палиндромом ( перевертышем ), с учетом четырех цифр
Дано натуральное число n (n 9999). Выяснить, является ли оно палиндромом ( перевертышем ), с...

Разветвляющийся алгоритм: является ли число палиндромом (перевертышем) с учетом четырех цифр?
Доброго времени суток! Нужна помощь с решением задачи, ибо я вообще не догоняю, как решать эту...

Дано натуральное четырехзначное число n. Определить, является ли это число перевертышем
Дано натуральное четырехзначное число n. Определить, является ли это число перевертышем. Например,...

Определить — является ли данное число перевертышем
Ввести с клавиатуры целое число. Определить - является ли данное число перевертышем, т.е....

__________________
Помогаю в написании курсовых работ и дипломов здесь.
2
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.