В VB нужно сделать запрет на ввод любых данных , кроме чисел. До этого пользовался IsNumeric. А сейчас не подходит, так как эта функция блокирует дробные числа, разделенные точкой, считая их не цифрой. А у меня в проекте для удобства пользователей дробные можно вводить с точкой или с запятой. VB = Val(Replace(ВерхнийБ.Text, ",", ".")) Заранее спасибо!

Да нет. Вы просто пишите с точки зрения как бы вы поняли а я не понимаю. Если бы я бы хотел чтобы мне разжевали и в рот положили то скинул бы проект. А так я сам хочу понять. И целый день сегодня угрохал на это, но не могу выход найти. Вы конечно извините если оскорбил вас тем что создал клон на другом форуме. Просто очень нужно.

Мне нужно чтобы когда вводил данные в ВБ и НБ программа работала как и с точкой так и с запятой. для этого записал вот это:-
VB = Val(Replace(ВерхнийБ.Text, ",", "."))
NB = Val(Replace(НижнийБ.Text, ",", "."))
А когда нажимаю- Расчет выполняется:-
If IsNumeric(ВерхнийБ.Text) And IsNumeric(НижнийБ.Text) And IsNumeric(G.Text) And IsNumeric(Приток.Text) Then
If Nedelia Then Raschet_na_nedeliu
If deni Then Raschet_na_deni
Else
MsgBox "Некорректный ввод данных", vbInformation + vbOKOnly, "Внимание!"
End If
End Sub
А по факту когда я вношу число например 25.25 выводит сообщение-MsgBox "Некорректный ввод данных", vbInformation + vbOKOnly, "Внимание!"

Shocker.Pro,вот если я коряво объясняю

Shocker.Pro, И форма

Объясните пожалуйста эти строчки:
Выделить всёкод Visual Basic
1:
2:
GoodDelim = Mid(Cstr(1.1),2,1)
If Not IsNumeric(Replace(Text1.Text,BadDelim,GoodDelim)) Then

Вот какое было мое сообщение! На что я получил ответ:-
http://msdn.microsoft.com/en-us/library/aa...6(v=vs.60).aspx
http://msdn.microsoft.com/en-us/library/aa...3(v=vs.60).aspx
http://msdn.microsoft.com/en-us/library/aa...0(v=vs.60).aspx
http://msdn.microsoft.com/en-us/library/aa...2(v=vs.60).aspx
http://msdn.microsoft.com/en-us/library/aa...2(v=vs.60).aspx
http://msdn.microsoft.com/en-us/library/aa...2(v=vs.60).aspx
Типа на читай. Ну почитал. Если это не моя специальность то мне тяжело в этом разобраться. Хотите я вам скину расчет потерь в нашей эноргосистеме? Я не сомневаюсь что вы разберетесь, а если вам надо срочно? Вы зашли на форум и хотите чтобы вам помогли а тут море ссылок на какие-то формулы, расчеты!
Да что я распинаюсь, думаю и после этого вам меня не понять.

Shocker.Pro, Нет, мне уже и Akila предложил вариант и еще один предложили. Я бы мог молча взять, подставить свои переменные и вуаля. Мне интересно самому понять как работает! Никогда не ожидал что программирование будет моим хобби, хотя наверное пока то, что я делаю с трудом можно назвать программированием, так баловство и мучение вас!
Вот за идею проверять уже после замены точки на запятую огромное спасибо. !!! Сейчас попробую

Shocker.Pro, Понял) буду исправляться) потратил много времени, зато узнал много нового а самое главное понял это! А это важнее