Спецсимволы как в VBA

[gjghjc]

В VBA есть специальные символы для замены или удаления любой цифры (^#), а есть ли что-нибудь подобное в чистом VB.
Мне например нужно написать прогу которая бы находила в текстовом файле числа формата
^#^#:^#^# (время) ^#^#^#^# г. (год).
Использование для этих целей макросы Ворда не предлагать!!!!!
Знаем, умеем, но не устраивает
Спасибо всем кто ответит

[Firestorm]

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

...и что делала?
думаю можно самому подогнать программу под это...

зы... эта тема как-нить относится к http://bbs.vbstreets.ru/viewtopic.php?t=1395

[bonch]

Проблема та в чём??

Код: Выделить всё

If "05:06" like "##:##" Then MsgBox "OK"


[gjghjc]

2Firestorm Относится, потому как необходимо удалять например все числа имеющие формат года да и над временем тоже поизвращаться нужно

[gjghjc]

2bonch предложенная тобой фишка работает только если в строке нет больше ничего кроме времени, а мне нужно что-то типа
String1=Replace(string2, "##:##", "*##:##*"), где # - это любая цифра

[Firestorm]

2bonch предложенная тобой фишка работает только если в строке нет больше ничего кроме времени, а мне нужно что-то типа
String1=Replace(string2, "##:##", "*##:##*"), где # - это любая цифра

ну дык подгони условия для определения времени в строке... типа такие условия: в строке должно быть":", и слева и справа на 2 то этого симовола должны быть цифры и только.... это и будет временем... типа если больше кикак...

[gjghjc]

Да, видно все-таки придется ручками делать, а жаль

[Firestorm]

Да, видно все-таки придется ручками делать, а жаль

в строке может быть несколько "времён" ?

[bonch]

look

Код: Выделить всё


string1="asd 05:00 lko 23:34 kkk"
if string1 like "*##:##*" then
   string2=mid(string1,1,instr(1,string1,"##:"))
   string3=mid(string1,instr(1,string1,":##"))
   string4=mid(string3,1,instr(1,string3,"##:"))
   string5=string2+"YOUR TIME"+string3
   '...
   '...
   'etc
end if