VPF::isWhiteSpace + isLetter на variable - Форум программистов

Spiker

Дата 27.4.2009, 15:18 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 265
Регистрация: 25.5.2005
Где: Спортзал

Репутация: нет
Всего: -2

я думал можно использовать проварку наподобие [A-Z ]{10,20} как в PHP

Добавлено через 1 минуту и 4 секунды
видимо функция мое лучшее решение

Добавлено через 11 минут и 19 секунд
как начать?

--------------------

Даваите жить дружно! (Леопольд.) :shy67:

Akina

Дата 27.4.2009, 15:55 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

Что значит - как начать?

Код


const validsymbols as string = " ABC...XYZabc...xyz" ' сам допишешь

function checkstring(str as string)  as boolean
for i=1 to len(str)
  if checksymbol(mid(str,i,1)) = false then
    checkstring = false
    exit sub
  end if
next
checkstring = true
end function

function checksymbol(str as string)  as boolean
if instr(validsymbols, str)>0 then
  checksymbol = true
else
  checksymbol = false
end if
end function

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

Spiker

Дата 27.4.2009, 15:59 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 265
Регистрация: 25.5.2005
Где: Спортзал

Репутация: нет
Всего: -2

спасибо =)
надо будет запомнить

--------------------

Даваите жить дружно! (Леопольд.) :shy67:

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »