Как осуществить ввод в TextBox по формату?

05.04.2010, 06:45. **Показов** 4475. **Ответов** 15

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

В VB6 у TextBox было свойство DataFormat, которое позволяло вводить данные по формату.
А в VB.NET нету такого.
Как быть?
Не думаю, что разработчики это опустиль, должно же быть, что то вместо этого.

@PMSSpy · 05.04.2010, 10:20

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

VB.NET

Dim x(1 to Len(TextBoxN.Text)) As String
x(1)='abcde'
x(2)='-.'
 
Sub TextBoxN_Change()
l = Len(TextBoxN.Text)
z = Right(TextBoxN.Text, 1)
If Instr(1,x(l),z)= 0 Then
If l > 1 Then
TextBoxN.Text = Left(TextBoxN.Text, l - 1)
Else
TextBoxN.Text = ''
End If
End If
End Sub

05.04.2010, 10:24

Спасибо.
Я думал, что есть готовый метод.

@mamba2000 · 05.04.2010, 19:27

Более продвинутый вариант Регулярные Выражения

VB.NET

'событие Validating
Private Sub TextBox1_Validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles TextBox1.Validating
        'Prerwat' esli ValidateControl вернул false
        'walidirowat' sender ob'ekt s maskoj dlja moskowskogo telefona
        e.Cancel = Not ValidateControl(sender, 'd{3}-d{2}-d{2}')
    End Sub
 
    Public Function ValidateControl(ByRef sender As TextBox, ByVal reg As String) As Boolean
        'esli net sowpadenij to 
        If Regex.IsMatch(sender.Text, reg) = False Then
            sender.ForeColor = Color.Red
            Return False
        Else
            sender.ForeColor = Color.Black
            Return True
        End If
    End Function

06.04.2010, 06:47

Что такое 'Regex' в выражении:
If Regex.IsMatch(sender.Text, reg) = False Then

06.04.2010, 07:50

В последнем примере (про телефон)
Номер можно вводить такой 123-12-12 и такой 123456-46-123456
А это не допустимо

@mamba2000 · 07.04.2010, 15:43

2Oleg
1.Это не принципиально я пытался показать КАК использовать регулярные выражения
Если принципиально то вот такое регулярное выражение будет корректней
^d{3}-d{2}-d{2}$

2.Regex класс из пространства имен
System.Text.RegularExpressions, реализует функции работы с регулярными выражениями

08.04.2010, 06:41

Я почитал, что такое 'регулярное выражение'. Правда в моей книжке не описаны некоторые значки (фигурные скобки, на пример). Но из вашего примера понятно, что это значит.
Спасибо.
Все вроде работает и можно остановиться на этом, но...
Я вообще то имел ввиду маленько не то. Возьмите Access и попромуйте в форме добавить textbox. Далее установите маску ввода (например дату).
Вот примерно так я и хочу, что бы работало и у меня. Еще раз повторюсь: в VB6 это было (свойство DataFormat у элемента TextBox)
Куда делось оно в VB.NET? Не может быть, что бы такое важное свойство выкинули. Наверняка закопали куда поглубже.

@mamba2000 · 08.04.2010, 16:02

Маски ввода отменили , ликвидоровали как класс мускулистой пролетарской рукой

В фигурных скобочках указываеться количество вхождений символа
d{3} точно 3 цифры
d{,3} до 3 символов
d{3,} 3 и больше символов
d{1,3} от 1 до 3 символов

Кста. вот здесь
http://www.codeproject.com/dotnet/Expresso.asp
Очень хорошая 'тулза' для редактирования/тестирования регулярных выражений, пользую постоянно.

11.04.2010, 06:44

Сходил на http://www.codeproject.com/dotnet/Expresso.asp
Но там требуют пароль

(
Хотя надо заметить штука хорошая.

11.04.2010, 06:44

Может вы по почте кинете?

11.04.2010, 12:23

Посмотри здесь (здесь есть много альтернатив Expresso, где регистрация не нужна):

http://msdn.microsoft.com/vcsharp/team/tools/

@boombastik · 11.04.2010, 14:35

Я бы рекомендовал зарегистироваться на http://www.codeproject.com и заглядывать туда почаще, многие вопросы типа: 'а как зделать, чтобы... ?', 'а каким образом ... ?' отпадут сами собой - на руках будет готовый работающий пример с исходным кодом и описанием.

С уважением, Владимир

@mamba2000 · 11.04.2010, 15:22

2Oleg Отправил ехпрессо вам почту, это вариант без исходников, если нужны будут исходники пишите

А на кодепроджект лучше зарегистрироваться

в этом я полностью согласен с тов. boombastik'ом

2kibizoid Действительно интересный линк, спасибо.

12.04.2010, 08:31

Скачал пример ввода текста по маске http://www.codeproject.com/vb/net/validtext3.asp
Это то что мне нужно, и за что я так вас всех много пытал.
Но вот как он работает, не понимаю

((
Каким образом обрабатывается ввод по маске?

@boombastik · 12.04.2010, 11:01

А в исходники слабо заглянуть?

@boombastik 7 / 7 / 12 Регистрация: 13.02.2007 Сообщений: 1,255
	11.04.2010, 14:35	13
	Я бы рекомендовал зарегистироваться на http://www.codeproject.com и заглядывать туда почаще, многие вопросы типа: 'а как зделать, чтобы... ?', 'а каким образом ... ?' отпадут сами собой - на руках будет готовый работающий пример с исходным кодом и описанием. С уважением, Владимир 0

Oleg
		1
	Как осуществить ввод в TextBox по формату? 05.04.2010, 06:45. Показов 4475. Ответов 15 Метки нет (Все метки) В VB6 у TextBox было свойство DataFormat, которое позволяло вводить данные по формату. А в VB.NET нету такого. Как быть? Не думаю, что разработчики это опустиль, должно же быть, что то вместо этого.

Oleg
	05.04.2010, 10:24	3
	Спасибо. Я думал, что есть готовый метод.

Oleg
	06.04.2010, 06:47	5
	Что такое 'Regex' в выражении: If Regex.IsMatch(sender.Text, reg) = False Then

Oleg
	06.04.2010, 07:50	6
	В последнем примере (про телефон) Номер можно вводить такой 123-12-12 и такой 123456-46-123456 А это не допустимо

@mamba2000 0 / 0 / 1 Регистрация: 30.07.2007 Сообщений: 257
	07.04.2010, 15:43	7
	2Oleg 1.Это не принципиально я пытался показать КАК использовать регулярные выражения Если принципиально то вот такое регулярное выражение будет корректней ^d{3}-d{2}-d{2}$ 2.Regex класс из пространства имен System.Text.RegularExpressions, реализует функции работы с регулярными выражениями 0

Oleg
	08.04.2010, 06:41	8
	Я почитал, что такое 'регулярное выражение'. Правда в моей книжке не описаны некоторые значки (фигурные скобки, на пример). Но из вашего примера понятно, что это значит. Спасибо. Все вроде работает и можно остановиться на этом, но... Я вообще то имел ввиду маленько не то. Возьмите Access и попромуйте в форме добавить textbox. Далее установите маску ввода (например дату). Вот примерно так я и хочу, что бы работало и у меня. Еще раз повторюсь: в VB6 это было (свойство DataFormat у элемента TextBox) Куда делось оно в VB.NET? Не может быть, что бы такое важное свойство выкинули. Наверняка закопали куда поглубже.

@mamba2000 0 / 0 / 1 Регистрация: 30.07.2007 Сообщений: 257
	08.04.2010, 16:02	9
	Маски ввода отменили , ликвидоровали как класс мускулистой пролетарской рукой В фигурных скобочках указываеться количество вхождений символа d{3} точно 3 цифры d{,3} до 3 символов d{3,} 3 и больше символов d{1,3} от 1 до 3 символов Кста. вот здесь http://www.codeproject.com/dotnet/Expresso.asp Очень хорошая 'тулза' для редактирования/тестирования регулярных выражений, пользую постоянно. 0

Oleg
	11.04.2010, 06:44	10
	Сходил на http://www.codeproject.com/dotnet/Expresso.asp Но там требуют пароль ( Хотя надо заметить штука хорошая.

PavelA
	11.04.2010, 12:23	12
	Посмотри здесь (здесь есть много альтернатив Expresso, где регистрация не нужна): http://msdn.microsoft.com/vcsharp/team/tools/

@mamba2000 0 / 0 / 1 Регистрация: 30.07.2007 Сообщений: 257
	11.04.2010, 15:22	14
	2Oleg Отправил ехпрессо вам почту, это вариант без исходников, если нужны будут исходники пишите А на кодепроджект лучше зарегистрироваться в этом я полностью согласен с тов. boombastik'ом 2kibizoid Действительно интересный линк, спасибо. 0

	12.04.2010, 11:01

Oleg
	12.04.2010, 08:31	15
	Скачал пример ввода текста по маске http://www.codeproject.com/vb/net/validtext3.asp Это то что мне нужно, и за что я так вас всех много пытал. Но вот как он работает, не понимаю (( Каким образом обрабатывается ввод по маске?

@boombastik 7 / 7 / 12 Регистрация: 13.02.2007 Сообщений: 1,255
	12.04.2010, 11:01	16
	А в исходники слабо заглянуть? 0