| Вопрос: Новое сообщение без темы | Добавлено: 08.10.02 22:15 |
Автор вопроса:  Synax | Web-сайт: elance.ru/sands
|
|
Ещё бы разрешить ввод минуса и запятой! А за этот код огромное спасибо!!! |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  Synax Вопросов: 20 Ответов: 61 |
Web-сайт: Профиль | Цитата | #1 | Добавлено: 08.10.02 22:20 |
|
Надеюсь все поняли к чему я это: Private Sub Text1_KeyPress(KeyAscii As Integer) так вот я хочу разрешить ввод запятой и минуса. |
||
|
Номер ответа: 2 Автор ответа:  CyRax   Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | Цитата | #2 | Добавлено: 08.10.02 23:00 |
|
Найди код минуса и запятой и вставь его в селект касе. MinCode=asc("-") ZptCode=asc(",") Case 0, 8,MinCode,ZptCode, 48 To 57 |
||
|
Номер ответа: 3 Автор ответа:  SynaxВопросов: 20 Ответов: 61 |
Web-сайт: Профиль | Цитата | #3 | Добавлено: 08.10.02 23:04 |
|
А где взять эти коды? |
||
|
Номер ответа: 4 Автор ответа: SynaxВопросов: 20 Ответов: 61 |
Web-сайт: Профиль | Цитата | #4 | Добавлено: 08.10.02 23:44 |
|
Всё нашёл! 44 и 45. Да я просто прогу маленькую написал Private sub form_keyPress label1.cabtion=acs("-") end sub |
||
Страница: 1 |