Помогите, пожалуйста, составить шаблон, соответствующий выражению:
К1234
Т.е. первой идет буква К (в одном экземпляре), а затем любые цифры в любом порядке, но не более 4 штук; или только цифры (без буквы К) - не больше 5
Могу составить только такой шаблон, который не позволяет вводить ничего, кроме цифр и буквы К, но в любом порядке и количестве.

Код

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged         Dim regexp As New System.Text.RegularExpressions.Regex("[^К0-9]+")         TextBox1.Text = regexp.Replace(TextBox1.Text, "")     End Sub

Попробуй так:

(^K|^[0-9])[0-9]{4}$ - шаблон который строго соответствует твоему условию (начинается на К или цифру, за ней 4 цифры и конец выражения).

Вот тебе еще список некоторых членов регулярнх выражений, надеюсь пригодится.


\
Marks the next character as either a special character, a literal, a backreference, or an octal escape. For example, 'n' matches the character "n". '\n' matches a newline character. The sequence '\\' matches "\" and "\(" matches "(".

^
Matches the position at the beginning of the input string. If the RegExp object's Multiline property is set, ^ also matches the position following '\n' or '\r'.

$
Matches the position at the end of the input string. If the RegExp object's Multiline property is set, $ also matches the position preceding '\n' or '\r'.

*
Matches the preceding subexpression zero or more times. For example, zo* matches "z" and "zoo". * is equivalent to {0,}.

+
Matches the preceding subexpression one or more times. For example, 'zo+' matches "zo" and "zoo", but not "z". + is equivalent to {1,}.

?
Matches the preceding subexpression zero or one time. For example, "do(es)?" matches the "do" in "do" or "does". ? is equivalent to {0,1}

{n}
n is a nonnegative integer. Matches exactly n times. For example, 'o{2}' does not match the 'o' in "Bob," but matches the two o's in "food".

{n,}
n is a nonnegative integer. Matches at least n times. For example, 'o{2,}' does not match the "o" in "Bob" and matches all the o's in "foooood". 'o{1,}' is equivalent to 'o+'. 'o{0,}' is equivalent to 'o*'.

{n,m}
m and n are nonnegative integers, where n <= m. Matches at least n and at most m times. For example, "o{1,3}" matches the first three o's in "fooooood". 'o{0,1}' is equivalent to 'o?'. Note that you cannot put a space between the comma and the numbers.

?
When this character immediately follows any of the other quantifiers (*, +, ?, {n}, {n,}, {n,m}), the matching pattern is non-greedy. A non-greedy pattern matches as little of the searched string as possible, whereas the default greedy pattern matches as much of the searched string as possible. For example, in the string "oooo", 'o+?' matches a single "o", while 'o+' matches all 'o's.

.
Matches any single character except "\n". To match any character including the '\n', use a pattern such as '[.\n]'.

(pattern)
Matches pattern and captures the match. The captured match can be retrieved from the resulting Matches collection, using the SubMatches collection in VBScript or the $0…$9 properties in JScript. To match parentheses characters ( ), use '\(' or '\)'.

(?:pattern)
Matches pattern but does not capture the match, that is, it is a non-capturing match that is not stored for possible later use. This is useful for combining parts of a pattern with the "or" character (|). For example, 'industr(?:y|ies) is a more economical expression than 'industry|industries'.

(?=pattern)
Positive lookahead matches the search string at any point where a string matching pattern begins. This is a non-capturing match, that is, the match is not captured for possible later use. For example 'Windows (?=95|98|NT|2000)' matches "Windows" in "Windows 2000" but not "Windows" in "Windows 3.1". Lookaheads do not consume characters, that is, after a match occurs, the search for the next match begins immediately following the last match, not after the characters that comprised the lookahead.

(?!pattern)
Negative lookahead matches the search string at any point where a string not matching pattern begins. This is a non-capturing match, that is, the match is not captured for possible later use. For example 'Windows (?!95|98|NT|2000)' matches "Windows" in "Windows 3.1" but does not match "Windows" in "Windows 2000". Lookaheads do not consume characters, that is, after a match occurs, the search for the next match begins immediately following the last match, not after the characters that comprised the lookahead.

x|y
Matches either x or y. For example, 'z|food' matches "z" or "food". '(z|f)ood' matches "zood" or "food".

[xyz]
A character set. Matches any one of the enclosed characters. For example, '[abc]' matches the 'a' in "plain".

[^xyz]
A negative character set. Matches any character not enclosed. For example, '[^abc]' matches the 'p' in "plain".

[a-z]
A range of characters. Matches any character in the specified range. For example, '[a-z]' matches any lowercase alphabetic character in the range 'a' through 'z'.

[^a-z]
A negative range characters. Matches any character not in the specified range. For example, '[^a-z]' matches any character not in the range 'a' through 'z'.

\b
Matches a word boundary, that is, the position between a word and a space. For example, 'er\b' matches the 'er' in "never" but not the 'er' in "verb".

\B
Matches a nonword boundary. 'er\B' matches the 'er' in "verb" but not the 'er' in "never".

\cx
Matches the control character indicated by x. For example, \cM matches a Control-M or carriage return character. The value of x must be in the range of A-Z or a-z. If not, c is assumed to be a literal 'c' character.

\d
Matches a digit character. Equivalent to [0-9].

\D
Matches a nondigit character. Equivalent to [^0-9].

\f
Matches a form-feed character. Equivalent to \x0c and \cL.

\n
Matches a newline character. Equivalent to \x0a and \cJ.

\r
Matches a carriage return character. Equivalent to \x0d and \cM.

\s
Matches any whitespace character including space, tab, form-feed, etc. Equivalent to [ \f\n\r\t\v].

\S
Matches any nonwhite space character. Equivalent to [^ \f\n\r\t\v].

\t
Matches a tab character. Equivalent to \x09 and \cI.

\v
Matches a vertical tab character. Equivalent to \x0b and \cK.

\w
Matches any word character including underscore. Equivalent to '[A-Za-z0-9_]'.

\W
Matches any nonword character. Equivalent to '[^A-Za-z0-9_]'.

\xn
Matches n, where n is a hexadecimal escape value. Hexadecimal escape values must be exactly two digits long. For example, '\x41' matches "A". '\x041' is equivalent to '\x04' & "1". Allows ASCII codes to be used in regular expressions.

\num
Matches num, where num is a positive integer. A reference back to captured matches. For example, '(.)\1' matches two consecutive identical characters.

\n
Identifies either an octal escape value or a backreference. If \n is preceded by at least n captured subexpressions, n is a backreference. Otherwise, n is an octal escape value if n is an octal digit (0-7).

\nm
Identifies either an octal escape value or a backreference. If \nm is preceded by at least nm captured subexpressions, nm is a backreference. If \nm is preceded by at least n captures, n is a backreference followed by literal m. If neither of the preceding conditions exist, \nm matches octal escape value nm when n and m are octal digits (0-7).

\nml
Matches octal escape value nml when n is an octal digit (0-3) and m and l are octal digits (0-7).

\un
Matches n, where n is a Unicode character expressed as four hexadecimal digits. For example, \u00A9 matches the copyright symbol (©).

Спасибо, но у меня почему-то не работает - вводится все, что угодно:

Код

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged         Dim regexp As New System.Text.RegularExpressions.Regex("(K|^[0-9])[0-9]{4}$")         extBox1.Text = regexp.Replace(TextBox1.Text, "")     End Sub

Кстати, а как .net определит, на каком языке я ввожу К - на русском или на английском, или ему без разницы?

Цитата(asper @ 4.10.2005, 05:50)

Спасибо, но у меня почему-то не работает  - вводится все, что угодно:

странно, я проверял на JavaScript этим кодом:

Код

<script language=JavaScript>   var nick_exp = new RegExp("(^K|^[0-9])[0-9]{4}$", "i");   var s = "K4345";   alert(s+": "+nick_exp.test(s)); </script>

я вечером в VB.NET поэкспериментирую...

Цитата(asper @ 4.10.2005, 05:50)

Кстати, а как .net определит, на каком языке я ввожу К - на русском или на английском, или ему без разницы?

Он же не смотрит на очертание буквы... каждая буква имеет свой код, и поэтому буква K английская и буква К русская имеют разный код в строке, хотя и выглядят одинаково.

Я пишу в vb.net - там не работает. Насчет кодировки - понятно, какую введу, ту и распознает, так как хранит все в кодах.

Тут на форуме был очень хороший материал по регулярным выражоваваниям по русски и с примерами использования только найти его не могу - наверно удалили...

Да, жаль, если удалили хороший ресурс...
Может, кто подскажет решение?

если бы ты сразу объяснил что именно ты хочешь сделать, то было бы проще...

Цитата(Mikle @ 4.10.2005, 13:44)

странно, я проверял на JavaScript этим кодом:

Я проверил на VB.NET. Выражение правильное.

Как я понял, тебе нужно сделать маску ввода, чтобы ограничить пользователя от ввода неверного текста (если не правильно понял, поправь).

Ты пытаешься сделать это путем замены текста. Это не правильно.
Как я сказал выше, рег. выражение правильное, и строка regexp.Replace(TextBox1.Text, "") вернет строку, в которой заменит найденые подпоследовательности на пустую строку. Поэтому, в данном случае, ты можешь ввести что угодно, кроме K1234 или 12345.
Чтобы доделать задачу, можно поступить так:

Вместо того чтоб на "лету" ограничивать пользователя, можно сделать предупреждение. То есть, при вводе скажем 5 знаков, сверху над TextBox'ом показать Label красного цвета с текстом типа: "Ошибка! Введите правильно!".

Код

Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged         Label1.Visible = Not System.Text.RegularExpressions.Regex.IsMatch(TextBox1.Text, "(K|^[0-9])[0-9]{4}$")     End Sub

А чтобы налету, то наверное надо как то ручками тебе это сделать, без регулярных выражений...

Наверно, я неверно что-то объясняю
Мне нужно оставлять в TextBox только те фразы, которые соответствуют шаблону К1234 или 12345, а все остальное заменять пустотой. То есть на первой позиции пользователь должен иметь возможность ввести только К или любую цифру, а на остальных четырех - только цифры. Как это реализовать? - извините, но не улавливаю...

У меня дома VB.NET не установлен, так что если в коде ошибки -- сам разберись:

Сначала, где-нибудь в конструкторе создадим regexp, который будем потом использовать:

Код

regexp = New System.Text.RegularExpressions.Regex(@"^(K\d{0,4})",RegexOptions.Compiled | RegexOptions.IgnoreCase);

Затем напишем два обработчика для TextBox:

Код

Private Sub TextBox1_KeyPress(sender As Object, e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress             If Char.IsLetterOrDigit(e.KeyChar) Then                 String txt = TextBox1.Text + e.KeyChar                 If regexp.Replace(txt, string.Empty) <> String.Empty Then e.Handled = True             End If         End Sub ' второй же нужен для того, чтобы некоректный текст,  ' который пользователь может вставить через Paste был стёрт.         Private Sub TextBox1_TextChanged(sender as Object, e As System.EventArgs) Handles TextBox1.TextChanged             If regexp.Replace(textBox1.Text, string.Empty) <> String.Empty Then                 Match m = regexp.Match(textBox1.Text)                 If m.Success Then                     TextBox1.Text = m.Groups[0].Captures[0].Value;                 Else                     TextBox1.Text = String.Empty;                 End If            End If         End Sub

Это сообщение отредактировал(а) Дрон - 6.10.2005, 08:34

не работает - вводится все, что хочешь...
записываю выражения нeсколько иначе, так как не могу понять, как завести указанные параметры:

Код

dim regexp As New System.Text.RegularExpressions.Regex("^(K\d{0,4})")

остальное пишу так же, с маленькой поправкой на vb...

объясни пожалуста, какой ты хочешь алгоритм? то что нужно ограничить ввод - это понятно... но как именно программа ведет себя? допустим есть текстовое поле в которое пользователь вводит строку. пока он набирает правильно, символы отображаются, если наберет не допустимый знак, символ не отразиться. Так? если да то между K1234 K4345 есть пробел или любой разделитель?

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

Добавлено @ 15:29
ЗЫ: забыл спросить, что ты хочешь получить на выходе алгоритма? выражение состоящее только из тех которые подходят под шаблон разделенные разтелителем?

Цитата

не работает - вводится все, что хочешь... smile

У меня всё работает.

Вот скачай, посмотри.
Потом ещё скачай Reflector -- и декомпилируй мой экзешник в исходник на VB.NET.


Присоединённый файл ( Кол-во скачиваний: 6 )
 test.zip 4,83 Kb

Попробую объяснить задачу.
Пользователь вводит символы с клавиатуры в textbox. Нажимает клавишу, при этом если та клавиша, которую он нажал - это не буква К (русская) и не цифра, то символ не отражается в TextBox.
Кроме того, если пользователь пытается ввести букву К больше одного раза или не в первой позиции textBox-а, то эта буква не отобразится в TextBox. Цифры могут вводиться в любой позиции. Количество символов я определаю через свойство TextBox.MaxLength - их должно быть не больше 5.
Как объяснить еще подробнее - ума не приложу.