Код для проверки наличия чисел в диалоговом окне

11.02.2011, 19:50. **Показов** 1022. **Ответов** 3

Author24 — интернет-сервис помощи студентам

НУЖНО НАЙТИ КОРНИ СЛАУ Я НЕ МОГУ КТО МОЖЕТ ЕСЛЕ НЕ СЛОЖНО ПОДЕЛИТЕСЬ ИДЕЕЙ(А ЛУЧШЕ ВСЕМ КОДОМ)ПОМОГИТЕ ГЛУПОЙ ДЕВУШКИ СДАТЬ КУРСОВИК
ИЕСЛИ НЕ СЛОЖНО ЁЩЁ КОД КАК ПРОВЕРИТЬ ЯВЛЯЮТСЯ ЛИ ДАННЫЕ В ДИАЛОГОВОМ ОКНЕ ЧИСЛАМИ....................СПАСИБО...

@amidi · 12.04.2011, 16:31

зачем девушкам мозги?

12.04.2011, 16:59

проверка цыфр

Visual Basic

function xxx()as boolean
xxx=false
dim str a string
dim i as integer
str=inputbox()
if trim(str)="" then exit function
str=replace(str," ","")
for i=1 to len(str)
if not isNumeric(mid(str,1,1)) then
exit function
end if
next i
xxx=true
exit function

12.04.2011, 17:00

Да, там можно еще проверку знака разделителя добавить.

надя
		1
	Код для проверки наличия чисел в диалоговом окне 11.02.2011, 19:50. Показов 1022. Ответов 3 Метки нет (Все метки) НУЖНО НАЙТИ КОРНИ СЛАУ Я НЕ МОГУ КТО МОЖЕТ ЕСЛЕ НЕ СЛОЖНО ПОДЕЛИТЕСЬ ИДЕЕЙ(А ЛУЧШЕ ВСЕМ КОДОМ)ПОМОГИТЕ ГЛУПОЙ ДЕВУШКИ СДАТЬ КУРСОВИК ИЕСЛИ НЕ СЛОЖНО ЁЩЁ КОД КАК ПРОВЕРИТЬ ЯВЛЯЮТСЯ ЛИ ДАННЫЕ В ДИАЛОГОВОМ ОКНЕ ЧИСЛАМИ....................СПАСИБО...

@amidi 0 / 0 / 0 Регистрация: 14.11.2010 Сообщений: 15
	12.04.2011, 16:31	2
	зачем девушкам мозги? 0

Сумрак
	12.04.2011, 17:00	4
	Да, там можно еще проверку знака разделителя добавить.