Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - .NET

Страница: 1 |

 

  Вопрос: содержимое текстбокса Добавлено: 27.06.07 07:25  

Автор вопроса:  Annie
как в текстбоксе отследить точку?
If txt_fromVal.Text = "." Then
   MessageBox.Show("Надо вводить запятую,а не точку", "Баг перехвачен!", MessageBoxDefaultButton.Button1)
        End If
 в данном коде VB не видит условия и перепрыгивает

Ответить

  Ответы Всего ответов: 6  

Номер ответа: 1
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #1
Добавлено: 27.06.07 09:43

if instr(1, txt_fromVal.Text, ".";) > 0 then
do until instR(1, txt_fromval.text, ".";) = 0
text1.text = text1.text = mid(text1.text,1,instR(1, txt_fromval.text, ".";)-1) & ","  & mid(text1.text, instR(1, txt_fromval.text, ".";)+1)
loop
end if

Ответить

Номер ответа: 2
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #2
Добавлено: 27.06.07 09:43
Вроде

Ответить

Номер ответа: 3
Автор ответа:
 astoro



ICQ: 649109 

Вопросов: 31
Ответов: 391
 Профиль | | #3 Добавлено: 27.06.07 09:53
do until instR(1, txt_fromval.text, ".";) = 0
text1.text = text1.text = mid(text1.text,1,instR(1, txt_fromval.text, ".";)-1) & "," & mid(text1.text, instR(1, txt_fromval.text, ".";)+1)
loop

можно заменить на replace наверное...

Ответить

Номер ответа: 4
Автор ответа:
 astoro



ICQ: 649109 

Вопросов: 31
Ответов: 391
 Профиль | | #4 Добавлено: 27.06.07 09:54
можна даже не проверять условия, зачем?

просто замену прописать да и все
replace (text,".",",";)

Ответить

Номер ответа: 5
Автор ответа:
 «0опай»



ICQ: Два, потом нуль, дальше-девять-шесть-девять-семь. 

Вопросов: 4
Ответов: 20
 Профиль | | #5 Добавлено: 27.06.07 13:42
If txt_fromVal.Text = "." Then
   MessageBox.Show("Надо вводить запятую,а не точку", "Баг перехвачен!", MessageBoxDefaultButton.Button1)
End If
-Если объект(строка) равна знаку(точке), то сообщение.

Rakel, тут каждый знак текстового поля проверять нужно, а не всю целиком. Для этого, лучше всего подойдёт встроенная функция реплаце, как уже писал astoro:

просто замену прописать да и все
replace (text,".",",";)

Ответить

Номер ответа: 6
Автор ответа:
 Annie



Вопросов: 19
Ответов: 40
 Профиль | | #6 Добавлено: 27.06.07 20:23
Спасибо за предложения.
-Если объект(строка) равна знаку(точке), то сообщение.

не совсем такая цель.
если в объекте(строке) присутствует точка, то вывести сообщение.
тут каждый знак текстового поля проверять нужно, а не всю целиком.
- с этого момента подробнее, в этом суть, а c replace проблем не возникало.
И еще вопрос, а можно запретить ввод букв и остальных символов, кроме запятой конечно.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам