PDA

View Full Version : در مورد پیدا کردن متن



behshad
شنبه 09 تیر 1386, 18:43 عصر
با سلام
سوالی داشتم
به طور مثال من با دستور instr متن مورد نظر خود را در تکستی پیدا کردم
تکست من اینه:
include = (a)
خب حالا من می خوام متنی که بین پرانتزها مشخص بشه حالا هر متنی می تونه
جای a باشه
چطوری باید این کار رو انجام بدم
ممنون از شما

Mehrdad Tehrani
شنبه 09 تیر 1386, 19:59 عصر
بیشتر توضیح بده

behshad
شنبه 09 تیر 1386, 20:55 عصر
می خوام هر متنی که داخل پرانتز هست نشون داده بشه

majidghost
شنبه 09 تیر 1386, 22:07 عصر
به جای اینکه الکی تاپیک درست کنی یه کمی فکر کن.

majidghost
شنبه 09 تیر 1386, 22:10 عصر
Dim T As String
T = "Include=a(majid)"
Dim P As Long
P = InStr(1, T, "(") + 1
Dim Z As String
Z = Mid(T, P, Len(T))
Z = Mid(Z, 1, Len(Z) - 1)
MsgBox Z