Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 23.10.2008, 15:51   #1
Gawwws
Пользователь
 
Регистрация: 18.10.2008
Сообщений: 65
По умолчанию Проверить кол-во символов в текстовой переменной

Я задаю переменную sName InputBox-ом, а потом надо проверить кол-во введённых символов (не мение 12). Как проверить переменную sName на кол-во символов?
Gawwws вне форума
Старый 23.10.2008, 16:03   #2
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

Len(sName)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума
Старый 23.10.2008, 16:23   #3
Gawwws
Пользователь
 
Регистрация: 18.10.2008
Сообщений: 65
По умолчанию

Спасибо!!!
А если надо что-б символы состояли только из цифр?
Gawwws вне форума
Старый 23.10.2008, 17:14   #4
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

проверить каждый символ строки
Asc(Mid(sName, i, 1)) < 48 или Asc(Mid(sName, i, 1)) > 57
значит это не цифра и такая строка не подходит.
где i от 1 до Len(sName)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума
Старый 23.10.2008, 17:41   #5
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
надо проверить кол-во введённых символов (не мение 12)
Цитата:
А если надо что-б символы состояли только из цифр?
a=inputbox("Введите 12 или более цифр")
msgbox (a like string(len(a),"#")) and len(a)>=12

Результатом выражения a like string(len(a),"#") будет True, если все символы строки a являются цифрами

В некоторых случаях подойдёт и MsgBox IsNumeric(a)
только IsNumeric(a) возвращает True также для дробных и отрицательных чисел (в отличии от a like string(len(a),"#"))

Последний раз редактировалось EducatedFool; 23.10.2008 в 18:34.
EducatedFool вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проверить тип переменной satana Общие вопросы Delphi 10 20.11.2010 21:43
Создать текстовой файл и подсчитать количество символов в нём. GN_ Паскаль, Turbo Pascal, PascalABC.NET 4 26.05.2010 19:45
кол-во букв в строке символов (Си) Newman Помощь студентам 1 04.12.2007 02:19
Ограничение на вводимое кол-во символов??? serjii Microsoft Office Excel 3 05.10.2007 10:55
Работа с файлами (создание, удаление, открытие, связываение с переменной, очищение памяти переменной) Arkuz Общие вопросы Delphi 12 25.09.2007 20:47