| Вопрос: Проверка типа данных | Добавлено: 05.06.07 12:14 |
Автор вопроса:  Сергей | Web-сайт: uts.dp.ua | ICQ: 369608887 |
|
Необходимо предотвратить ошибку.
Есть, например, TextBox и кнопа. На кнопке стоит математическая формула с использованием данных TextBox. Так вот если какой-то ламер введет туда слово и нажмет кнопку - будет ошибка. Делаю так: If Скорость.Text = "" Then GoTo 10 If Скорость.Text < 0.1 Or Скорость.Text > 30 Then GoTo 10 ...................... 10: End sub А хотелось бы типа так: Если какая-то ОШИБКА то goto 10. Спасибо за Внимание. |
| Ответы | Всего ответов: 15 |
|
Номер ответа: 1 Автор ответа:  GSerg Вопросов: 0 Ответов: 1876 
|
Профиль | | #1 | Добавлено: 05.06.07 13:12 |
|
If Скорость.Text = "" Then GoTo 10 Ужас какой. If Скорость.Text < 0.1 Ужас какой. Or Скорость.Text > 30 Ужас какой. Then GoTo 10 Ужас какой. Автору рекомендуется поставить в начале модуля Option Strict On и удивиться. После чего начать болезненный, но очень полезный процесс привыкания к тому, что нельзя числа сравнивать со строками, если, конечно, ты не бабулька, решившая на досуге покидать кнопочек на форму, а то внучок же этим занимается, ну-ка я попробую... |
||
|
Номер ответа: 2 Автор ответа: sneРазработчик Offline Client ICQ: 233286456 Вопросов: 34 Ответов: 5445 |
Web-сайт: Профиль | | #2 | Добавлено: 05.06.07 18:59 |
жеесть  ) всем друзьям разослал по линке
|
||
|
Номер ответа: 3 Автор ответа: Сергей ICQ: 369608887 Вопросов: 7 Ответов: 24 |
Web-сайт: Профиль | | #3 | Добавлено: 05.06.07 20:36 |
|
Очень смешно, а может кто-нибудь подскажет, как надо?
Кстати может и геморойно, но работает. |
||
|
Номер ответа: 4 Автор ответа: СергейICQ: 369608887 Вопросов: 7 Ответов: 24 |
Web-сайт: Профиль | | #4 | Добавлено: 05.06.07 20:37 |
| Вы все тут программисты, а я инженер, который хочет сделать полезную программу. | ||
|
Номер ответа: 5 Автор ответа: GSergВопросов: 0 Ответов: 1876
|
Профиль | | #5 | Добавлено: 05.06.07 20:54 |
|
Очень смешно, а может кто-нибудь подскажет, как надо?
Конструктив был приведён сразу после слов "Автору рекомендуется". После выполнения этого конструктива можно было, читая описания вдруг появившихся ошибок студии, выйти на разнообразные нужные методы а-ля Parse разнообразных нужных объектов а-ля Integer или Single. Кстати может и геморойно, но работает.
Геморройно -- неправильное слово. Правильное слово -- криво. Криво до жути, но совершенно не геморройно. Кстати, "работает" -- тоже не совсем правильное слово. Скорее, "работает только в тепличных условиях только при данных настройках компилятора и данных региональных параметрах, выставленных в Windows в Панели управления". Вы все тут программисты, а я инженер, который хочет сделать полезную программу
Полезные программы не рождаются без RTFMа. RTFM! О преобразовании типов. |
||
|
Номер ответа: 6 Автор ответа: СергейICQ: 369608887 Вопросов: 7 Ответов: 24 |
Web-сайт: Профиль | | #6 | Добавлено: 05.06.07 21:02 |
|
Поставил в начале модуля Option Strict On и УДИВИЛСЯ.
Модуль у меня бешанный (большой), выдало 102 ошибки. Сейчас буду разбираться. Спасибо за помощь. Подготовлю несколько вопросов и обращусь, если можно. |
||
|
Номер ответа: 7 Автор ответа: СергейICQ: 369608887 Вопросов: 7 Ответов: 24 |
Web-сайт: Профиль | | #7 | Добавлено: 05.06.07 21:05 |
|
Ув. GSerg (теска наверно)!
Скажите пожалуйста, можно ли мне выложить (или отослать на мыло) свою форму, чтобы Вы мне указали на абсолюно неверный подход к тем или иным методам написания моей программы? Спасибо за внимание. |
||
|
Номер ответа: 8 Автор ответа: GSergВопросов: 0 Ответов: 1876
|
Профиль | | #8 | Добавлено: 05.06.07 21:10 |
|
Это возможно.
Подойдёт любой файлообменник. |
||
|
Номер ответа: 9 Автор ответа: СергейICQ: 369608887 Вопросов: 7 Ответов: 24 |
Web-сайт: Профиль | | #9 | Добавлено: 05.06.07 22:12 |
|
http://meg.ifolder.ru/2249358
Спасибо, жду ответа |
||
|
Номер ответа: 10 Автор ответа: GSergВопросов: 0 Ответов: 1876
|
Профиль | | #10 | Добавлено: 06.06.07 08:26 |
|
Присвоение текста числовым переменным и обратно.
Тупые имена контролов а-ля ComboBox5. Жуткие конструкции вида If ComboBox5.Text = 150 Then
<много кода> If ComboBox5.Text = 200 Then <много кода> If ComboBox5.Text = 250 Then <много кода> В них каждый раз содержимое ComboBox5.Text проверяется столько раз, сколько существует вариантов. Хотя должно проверяться ровно один раз. С помощью Select Case или хотя бы ElseIf. Саму форму не видел, поскольку VB 2005 не стоит. |
||
|
Номер ответа: 11 Автор ответа: DullyICQ: 229882730 Вопросов: 19 Ответов: 51 |
Профиль | | #11 | Добавлено: 06.06.07 08:42 |
|
to Сергей:
а что долно происходить при нажатии кнопачки со стрелочкой? |
||
|
Номер ответа: 12 Автор ответа: DullyICQ: 229882730 Вопросов: 19 Ответов: 51 |
Профиль | | #12 | Добавлено: 06.06.07 09:35 |
|
to Сергей:
http://meg.ifolder.ru/2253225 попробуй... вродя работаит... и ошибк иногда хоть обрабатывай, а то матиматика плоха работаит |
||
|
Номер ответа: 13 Автор ответа: СергейICQ: 369608887 Вопросов: 7 Ответов: 24 |
Web-сайт: Профиль | | #13 | Добавлено: 06.06.07 10:52 |
|
СПАСИБО ОГРОМНОЕ !
Вы единственные, кто мне реально помогает! а что долно происходить при нажатии кнопачки со стрелочкой?
--- Переход в другую форму с дальнейшим расчетом. http://meg.ifolder.ru/2253225
Работает.
попробуй... вродя работаит... В них каждый раз содержимое ComboBox5.Text проверяется столько раз, сколько существует вариантов. Хотя должно проверяться ровно один раз. С помощью Select Case или хотя бы ElseIf.
Буду пробывать. Спасибо.
|
||
|
Номер ответа: 14 Автор ответа: DullyICQ: 229882730 Вопросов: 19 Ответов: 51 |
Профиль | | #14 | Добавлено: 06.06.07 11:35 |
|
Спасибо
не за что.. если что в асю стучись... я не профессионал... но кое что получается 
|
||
|
Номер ответа: 15 Автор ответа: СергейICQ: 369608887 Вопросов: 7 Ответов: 24 |
Web-сайт: Профиль | | #15 | Добавлено: 06.06.07 11:43 |
| ОК | ||
Страница: 1 |