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

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

Вернуться   Форум программистов > IT форум > Общие вопросы по программированию, компьютерный форум
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 17.08.2019, 15:34   #1
Alex711
Пользователь
 
Регистрация: 21.09.2018
Сообщений: 99
По умолчанию Условие с диапазоном чисел B4A

Здравствуйте, как в Basic4Android написать условие:
if EditText1 = диапазону чисел от 1 до 18 then...
Alex711 вне форума Ответить с цитированием
Старый 17.08.2019, 17:24   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

понятия не имею, что такое
Цитата:
Сообщение от Alex711 Посмотреть сообщение
Basic4Android
более того, сама постановка вопроса непонятна (что значит - поле в текст боксе равно диапазону чисел?
Там все числа от 1 до 18 (1,2,3,4,5 .... 17,18) ? через пробел, через запятую?
или так должно быть "1 - 18" ? Или просто одно из чисел от 1 до 18 ?

если нужно проверить, что в TextEdit1 у Вас число от 1 до 18, то нужно пробовать, как Ваш Basic "скушает".

варианты:
автоматическое преобразование текста в число
Код:
Private mm As Long
mm = EditText1.Text
if (mm>0) and (mm<19) then ...
или
попытка использовать функцию Convert
Код:
Private mm As Long
mm = Convert.toInt32(EditText1.Text)
if (mm>0) and (mm<19) then ...
или попытка использовать метод класса Int32:
Код:
Private mm As Integer
Int32.TryParse(EditText1.Text, mm) 
if (mm>0) and (mm<19) then ...

p.s. не удивлюсь, если ни один из способов не подойдёт...
Serge_Bliznykov вне форума Ответить с цитированием
Старый 17.08.2019, 17:46   #3
Alex711
Пользователь
 
Регистрация: 21.09.2018
Сообщений: 99
По умолчанию

Так работает:
If EditText1 >= 1 And EditText1 <=18 Then
Alex711 вне форума Ответить с цитированием
Старый 17.08.2019, 20:00   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от Alex711 Посмотреть сообщение
Так работает:
отлично!
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сравнение числа, с диапазоном чисел Юрий9 Общие вопросы Delphi 13 28.02.2016 11:34
Дано N действительных чисел. Вычислить произведение тех членов последовательности, для которых выполнено условие... c@rtman Паскаль, Turbo Pascal, PascalABC.NET 1 12.06.2015 15:36
Проверка чисел на простоту. Не работает условие. krab777 Общие вопросы Delphi 2 06.06.2011 09:33
Не срабатывает условие сравнения чисел. Solvinder Помощь студентам 1 28.04.2011 23:01
Как найти количество чётных чисел диапазоном от 1 до 11? SORIK Microsoft Office Excel 3 02.01.2008 23:37