واضح آرشیو وب فارسی:سایت ریسک: یه سوال در مورد ویژوال بیسیک حامد منصف 27 فروردين 1386, 13:39ما یه تکست باکس داریم که توش نوشته "هوا بارانی است" چجوری میتونیم چک کنیم یه کلمه مثلا "باران" تو این باکس نوشته شده یا نه؟ به روش کارکتری saalek110 27 فروردين 1386, 16:10سلام حامد جان. به نظرم باید ساده باشه. کلمه باران 5 حرف دارد. پس باید از اول رشته 5 تا جدا کنی ببینی مساوی باران هست یا نه بعد حروف دوم تا ششم را و بعد حروف سوم تا هفتم را. فکر کنم مشکلی نباشه. از len و رایت و لفت استفاده کن. حامد منصف 27 فروردين 1386, 18:36سلام اخه می دونین موضوع چیه من میخوام از این موضوع برای یک موتور جستجو که خودم برنامشو نوشتم استفاده کنم الان کار این موتور اینجوریه که کلمه ای رو که در باکس جستجو نوشته شده با تک تک فیلدا مقایسه و نتایج رو نشون میده اما من میخوام طوری بگرده که اگه عبارت مورد نظر قسمتی از یه فیلد بود بازم اون فیلد رو نشون بده در واقع من نمیدونم که فیلد دارای چند کارکتره و کلمه ای که میخواد جستجو بشه هم همینطور "باران و هوا بارانی بود فقط یه مثال بود به ظاهر سادست ولی چند روزه فکر منو به خودش مشغول کرده و . . . ممنون میشم کمکم کنین nima_dir 27 فروردين 1386, 22:31سلام از تابع instr استفاده كن حامد منصف 27 فروردين 1386, 23:56میشه یه مقدار بیشتر توضیح بدین nima_dir 28 فروردين 1386, 11:30سلام من الان دقيق يادم نيست چون خيلي وقته كه با وي بي كار نكردم اما اگه ذهنم ياري كنه دو تا آرگومان ميگرفت بطوريكه يه رشته رو در ديگري پيدا ميكرد(ترتيب آرگومانهاش رو يادم نيست) و يه عدد كه مشخص كننده شروع رشته كوچكه تو بزرگسن برميگردوند. به Msdn مراجعه كنين تا اطلاعات بهتري بدست بيارين saeedsmk 28 فروردين 1386, 22:31سلام خوب هستيد ميتونيد از دستور instr با ارگمان هاي زير استفاده كنيد InStr(sCheck, sMatch[, Start[, Compare]]) حامد منصف 29 فروردين 1386, 06:22ممنون از دوستان عزیز من تابع رو پیدا کردم یه مثالم تو msdn بود که وقتی اجرا می کنم تو خط زیر ارور میده Private Function FindIt(Box As RichTextBox, Srch As String, _ Optional Start As Long) فکر میکنین مشکل کجاست بعدشم یه ریچ باکس داره این با تکست باکس فرق می کنه؟ nima_dir 29 فروردين 1386, 12:12سلام دوست عزيز بله كاملا فرق داره .اونو بايد به toolbox اضافه كنيد.rich text box با وي بي نصب ميشه بايد اونو اضافه كنيد حامد منصف 29 فروردين 1386, 12:14گرفتم مشکل کجاست من بجای ریچ باکس تکست باکس گذاشته بودم ولی هنوز نفهمیدم ریچ باکس رو از کجا میشه گذاشت تو فرم saalek110 29 فروردين 1386, 17:06باید به جعبه ابزار اضافه کنید. باید به کامپوننت ها بروید و آن را به جعبه ابزار اضافه کنید. Project menu -> component sub menu -> Microsoft rich textbox control 6.0 Parthia 08 تير 1386, 23:00آره منم دقیقا همچین مشکلی رو دارم اگر کسی میدونه یه مثال بزنه قضیه حله البته من MSDN ندارم اگه میشه یه مثال ساده هر وقت ذهنتون یاری کرد (دو نقطه دی) راستی میشه اینطوری نوشت :؟ Dim txt1 As String txt1 = Left$(txt1,len(txt1) - 1) البته با استفاده از حلقه For ؟؟؟
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 1241]