[Iska]

Так (код на WSH):

Код:

Option Explicit

Dim strValue
Dim objMatch


strValue = "aaa0bbb-,-1-,-2-,-ccc-,-3-,-4-,-ddd5-,-6-,-eee-,-7-,-8fff-,-9eee10-,-fff-,-1-,-2-,-3-,-4-,-"

With WScript.CreateObject("VBScript.RegExp")
	.Global = True
	.Pattern = "(?=\d)[\d,-]*\d"
	
	For Each objMatch In .Execute(strValue)
		WScript.Echo objMatch.Value
	Next
End With

WScript.Quit 0

Код: 0 1-,-2 3-,-4 5-,-6 7-,-8 9 10 1-,-2-,-3-,-4

?

можно так: Код: ^(\d)|(\d[\d\,\-]*\d)$ »

Нельзя: все совпадения будут односимвольными, т.е. будет всегда отрабатывать первая из альтернатив:

Код:

^(\d)|(\d[\d\,\-]*\d)$

Добавлено:
pva, проверил ещё раз, поменяв порядок альтернатив. Так:

Код:

(\d[\d\,\-]*\d)|(\d)

— работает.

[torauma]

поэтому думал будет проще находить регулярными выражениями »

Some people, when confronted with a problem, think “I know, I'll use regular expressions.” Now they have two problems.

Ну точно про Вас сказано

[LilLoco]

пиши алгоритмически - потом тебе же легче будет разбираться »

В смысле просто написать свою функцию проверки?)

— работает. »

Не работает - позволяет ввести сначала запятую.

Так (код на WSH): »

Так тоже нет, так же позволяет внести запятую.

[Iska]

Не работает - позволяет ввести сначала запятую. »

На WSH — нет:

Код:

Option Explicit

Dim strValue
Dim objMatch


strValue = ",-1-,-2-,"

With WScript.CreateObject("VBScript.RegExp")
	.Global = True
	.Pattern = "(?=\d)[\d,-]*\d"
	
	For Each objMatch In .Execute(strValue)
		WScript.Echo objMatch.Value
	Next
End With

WScript.Quit 0

Код: 1-,-2

А что на VB.Net?

Стоп. Что значит «ввести/внести» в Вашей трактовке?

[LilLoco]

Ну я имею ввиду, что можно в текстовое поле ввести например ,8,9
А необходимо чтобы первый символ - была только цифра.

Вот как то так.

Прошу прощения за изложение мыслей так "непонятно" - сказывается конец рабочей недели((

[pva]

Нельзя: все совпадения будут односимвольными, т.е. будет всегда отрабатывать первая из альтернатив: »

Действительно косячно работало. Попробовал вот так:

Код:

var re = /^\d$|^\d[\d\,\-]*\d$/;
var test = [
	"312321",
	"3",
	"31,23-21",
	"31232,1",
	"312321,",
	"-,312321",
	"3-",
	"3-,,,,5",
	"3----6",
	"-3-"
	]

for(i in test) {
	WScript.Echo(test[i] + ":\t\t\t" + re.exec(test[i]));
}

Вроде работает:

Код:

312321:                 312321
3:                      3
31,23-21:                       31,23-21
31232,1:                        31232,1
312321,:                        null
-,312321:                       null
3-:                     null
3-,,,,5:                        3-,,,,5
3----6:                 3----6
-3-:                    null

Но это всё implementation-specific

В смысле просто написать свою функцию проверки?) »

Совершенно верно!

[Iska]

Ну я имею ввиду, что можно в текстовое поле ввести например ,8,9 А необходимо чтобы первый символ - была только цифра. »

LilLoco, так ввод — это совсем другое. Вам маска ввода нужна для поля ввода, а не регулярка. Регулярка, напротив, поможет из введённого бреда попытаться извлечь что-либо подходящее.

Действительно косячно работало. »

Так обратный порядок альтернатив в Вашем примере — работал. Я позже нашёл в документации явное упоминание, что сравнение альтернатив идёт слева направо. Мне же почему-то раньше казалось, что все части равноправны, ан — нет.

[LilLoco]

Регулярка, напротив, поможет из введённого бреда попытаться извлечь что-либо подходящее. »

В .Net есть метод IsMatch, который, как я понял прочитав в первый раз, проверяет соответствие введенной строки с заданным регулярным выражением. Теперь, Iska, вы открыли мне глаза!

Совершенно верно! »

Так и сделаю.

Видимо регулярные выражения совершенно не для меня

[pva]

LilLoco, Регулярные выражения - очень простая штука. Поиграйся с поиском-заменой в текстовом редакторе (например notepad++) и всё поймёшь. Это очень удобный и для поиска и замены текста инструмент.
Но их функционал ограничивается выявлением шаблона в тексте, не более. Например регулярным выражением нельзя выяснить, что диапазон 999-100 задан неверно.
А кодом, например, можно сделать как на скриншоте (аттач)

[Niaz]

Ребята, не подскажите, как можно сделать заливку этого участка по координатам?
Или залить участок с прозрачностью 50%. ?

это тут делается? <Style><LineStyle><color>ff0000ff</color></LineStyle><PolyStyle><fill>0</fill></PolyStyle></Style>