فوری پیدا کردن یک رشته درون یک textbox

[آزیتا نبی زاده]

با سلام به همگی دوستان
می خوام یک رشته رو توی یک textBox بگردم و محل شروع این رشته رو دریافت کنم.
لطفا کمکم کنید.

[PalizeSoftware]

سلام
اینجوری:


pos=instr(text1.text,"This")

موفق باشید.

[ehsan_ansaripoor]

دوست عزیز اگر منظور شما از بگردم جستجو باید Righttoleft را هم برای TextBox مد نظر داشته باشی و برای این کار می تونی از توابع (Right(String,Integer یا (Left(String,Integer یا (Mid(String,Integer,Integer استفاده کنی

[آزیتا نبی زاده]

دوست عزیز اگر منظور شما از بگردم جستجو باید Righttoleft را هم برای TextBox مد نظر داشته باشی و برای این کار می تونی از توابع (Right(String,Integer یا (Left(String,Integer یا (Mid(String,Integer,Integer استفاده کنی

دوست عزیز من اصلا نفهمیدم جوابی رو که شما دادید چه ربطی به سوال من داشت.

[j_sadi]

با سلام تابع زیر در ویژوال بیسیک نوشته شده و دو رشته را قبول می کند اگر رشته ی Str2 در درون رشته ی Str1 باشد مقدار True واگر نه False را بر می گرداند
موفق باشید

Public Function Compare_Include(str1 As String, str2 As String) As Boolean
result = 0
If str1 = str2 Then
result = 1
Else
For i = 1 To (Len(str1) - Len(str2)) + 1
If Mid(str1, i, Len(str2)) = str2 And Len(str2) <> 0 Then result = 1
Next
End If
Compare_Include = result
End Function

[__siavash__]

همون طور که در بالا دوستمون PalizeSoftware گفت جواب میده :
مثلا در عبارت Microsoft Visual Basic 6.0
با کد
pos = InStr(Text1.Text, "Basic")
مقدار 18 برمیگرده که عبارت Basic جستجو شده و فاصله حرف اولش یهنی B از ابتدا برمیگرده
فقط اکه دو تا Basic تو جمله باشه اولیشو در نظر میگیره !