PDA

View Full Version : جدا کردن کلمات یک جمله و لیست کردن آن در جعبه لیست



parselearn
یک شنبه 21 بهمن 1386, 02:50 صبح
دوستان کدی دارند که بشه اطلاعات یک جعبه متن را از هم جدا کرد و در جعبه لیست، لیست کرد
ممنون

bobrus
یک شنبه 21 بهمن 1386, 09:10 صبح
دوست عزیز اگه جمله شما انگلیسی باشد سخت نیست به سادگی می تونید از کلید space استفاده کنید و فاصله بین کلمات رو تشخیص بدین. با استفاده از دستورات رشه مثل ,...mid-right-left- len-spit می تونین برنامه خودتون رو بنویسید چون کار ساده ای هست برنامه واستون آپلود نمی کنم
ولی اگه جمله فارسی باشه به این سادگیا نیست چون بعضی از کلمه ها هستند که اجزا شون از هم جداست ولی یه کلمه حساب می شن برای اینکار باید علاوه بر space شرایط خاص رو هم بررسی کنید

vbhamed
یک شنبه 21 بهمن 1386, 09:13 صبح
سلام


Dim s$, w$(), i&

s = Text1.Text
w = Split(s, " ")

List1.Clear
For i = 0 To UBound(w)
List1.AddItem w(i)
Next

ali_habibi1384
سه شنبه 23 بهمن 1386, 07:23 صبح
این دیگه از اون سوالات بود . هر کس بسته به مهارتش می تونه این کارو انجام بده.
تابع mid این کارو می تونه انجام بده.