• پایان فعالیت بخشهای انجمن: امکان ایجاد موضوع یا نوشته جدید برای عموم کاربران غیرفعال شده است

پیدا کردن یک رشته خاص در TextBox با تابع InStr

smart_boy_bnd

Registered User
تاریخ عضویت
7 می 2010
نوشته‌ها
70
لایک‌ها
0
سلام دوستان من یک تکست بوکس دارم که میخوام یک جمله رو از این بیرون بکشم لطفا راهنمایی کنید میخوام در این تکست بوکس جملاتی که اینگونه maryam$rezaya$sadegh هستن بیارم بیرون بریزم در لیست بوکس جای این جملات هم تغییر میکنه که میخواستم با InStr این جملات رو بکشم بیرون که نشد بخاطر اینکه با هر بار رفرش تکس باکس جای جملات تغییر میکنه. کلمات درون این جمله هم تغییر میکنن...راهنمایی کنید ممنون.
یک نکته این هست که همیشه سه کلمه هستن که بین این کلمات $ وجود دارد. maryam$rezaya$sadegh

دوستان نیاز فوری دارم اگه میشه با یه سورس راهنمایی کنید.ممنون
 

e h s a n

Registered User
تاریخ عضویت
16 می 2009
نوشته‌ها
1,041
لایک‌ها
702
visual basic?
درست متوجه نشدم اما شما با instr پیدا کن بریز تو یه متغیر آرایه و و بعد اد کن به لیست باکس کجاش مشکله؟
مثلا

InStr([start, ]string1, string2[, compare])

Instr(1, “Visual Basic”,” Basic”)
بعدز درآوردن طولش

حالا اینو تو for next میذاری و میگی مثلا بین هر $ رو پیدا کنه
بعدشم با MID میشه درآوردش
str1 = Mid(str, x, y - x) که میگه از چه کاراکتری چند تا بره جلو...
 

smart_boy_bnd

Registered User
تاریخ عضویت
7 می 2010
نوشته‌ها
70
لایک‌ها
0
دوسته عزیز من مبتدی هستم و تازه کار اگه میشه با یک سورس راهنمایی کن . ممنون
 

smart_boy_bnd

Registered User
تاریخ عضویت
7 می 2010
نوشته‌ها
70
لایک‌ها
0
دوسته عزیز اگه امکانش هست با یه سورس کذ راهنمایی کن.ممنون
 

1 Saeed

Registered User
تاریخ عضویت
20 دسامبر 2009
نوشته‌ها
1,696
لایک‌ها
157
محل سکونت
Tehran
سلام

اگر اصراری بر این نداری که حتما از instr استفاده کنی، میتونی از تابع Split استفاده کنی. به اینصورت:
کد:
  Dim textStr As String
  Dim textPart
  Dim splitArray
  
  textStr = "text1$text2$text3"
  splitArray = Split(textStr, "$")
  
  For Each textPart In splitArray
    List1.AddItem textPart
  Next

اگر هم بخوای از instr استفاده کنی باید با این تابع $ رو پیدا کنی توی یه حلقه do while تا موقعی که اینا تو رشته ـت موجودن و بعد از هر موردی که پیدا کرد با استفاده از تابع Mid باید از نتیجه تابع instr تا پیدایش $ بعدی این تابع رو مقداردهی کنی تا بتونی به هدفت برسی.
اگر اینم خواستی بگو بنویسم. ولی در کل split خیلی بهتره و performance بیشتری هم داره.

موفق باشین
 

King.V@hid

کاربر تازه وارد
تاریخ عضویت
21 ژوئن 2010
نوشته‌ها
97
لایک‌ها
0
ممنون از شما دوست عزیز .
 
بالا