? Visual Basic ?

Iskam da vi pitam neshto.Imate slednia tekst : "mk [C:\xyz.txt]".Kakuv kod shte triabva da napisha za da vzema samo teksta mejdu scobite.No kato se ima predvid che toi moje da e razlichen.

Пиша го без да го проверявам това 5 е началния символ, другото е дължината минус броя на излишните символи
mid$("mk [C:\xyz.txt]", 5, len("mk [C:\xyz.txt]") - 5)

mn_t, много правилно го обясни, ама това е валидно за ТОЗИ случай. Човеко пита как да стане, при положение, че текста е различен. ;о)

ето и малко код:
-----------------------
strText = "mk [C:\xyz.txt]"
intBegin = InStr(strText, "[") + 1
intEnd = InStr(strText, "]")
strOut = Mid(strText, intBegin, intEnd - intBegin)
-----------------------
абе, виж сега, тези променливи intBegin и intEnd може и да ги посъкратиш, ако направо ги заместиш в MID(..), но съм го написал така, за да ти е по-прегледно.

Хайде от мене чао, и ако имаш желание - обади се по ICQ. Номера ми е 34254941, или в IRC-то "Mr_Ibkis"
;o)

А какво ще стане ако има файл pic[1].jpg с този instr?

Обединението от двете решения би изглеждало така
strText = "mk [C:\xyz.txt]"
intBegin = InStr(strText, "[") + 1
strOut = Mid(strText, intBegin, Len(strText) - intBegin - 1)
Пък и бях разбрал, че текста само в скобите е различен.

abe ne znam kak e na bazika ama shto ne pusnete reverse find na obratnata skoba?
i togawa da si napraite mid weche sys sigurni stoinosti
i ne zabrawqite da prowerite dali wyobshte ima takiwa skobi :)))
syshto i dali poziciite im ne sa obratni
t.e. "mk ]ala-bala[" :)

May the beer be with you

-------------------------------
Koito go moje - go moje!

Ми и аз вече не си спомням много, ама reverse find май нямаше.

А и освен това, така написано без разните суфикси всичко става Variant, което е доста разхитително.

А като сме тръгнали да проверяваме всичко, то да проверим има ли въобще някакъв текст.

Проверих дали има бира, ама нямаше .

Както виждам - заяждаш се без причина. Както и да е. Аз пък съм писал тук за да помогна на човека, а не за да се заяждам за глупости. Ако имаш доводи срещу мен - опитай да ме обориш, ако не - замълчи си дискретно, за да не те мислят за глупак (вече е късно).

Първо: За какъв <цензура> ми е да търся текст извън скобите, след като заданието е "da vzema samo teksta mejdu scobite"? Забележката на Mobile беше къде къде по-добре написана.

Второ: ИМА reverse find, може да провериш в онлайн помощната информация за InStr и InStrRev.

и Трето: Това, което написах е само пример, който може да пасне, а може и да не пасне със останалата част от сорса. Както и сам можеш да забележиш - дори не съм написал декларациите.

Хайде да не пиша повече (поне за днес), че стана време за лягане. А ти опитай да си формулираш по-ясно мислите, за да не ти се налага да пишеш по 5 постинга за едно и също. Направо си представям какви програми успяваш да напишеш с този начин на мислене... ;о) Както и да е. Аз също не ставам за програмист.

Както кажеш
Хубаво е че има InstrRev не бях попадал на нея за периода в който се занимавах с VB.
Не се заяждам за глупости, а за случаи от следния вид:
"mk [C:\file[1].txt]"
Лека ти нощ.

Брато купи си книшки за начинаешти тая работа там я пише .
2 тома. цена 25лв. със диск