1 :تعداد فایل پیوست
پاسخ: کمک در مورد جابجایی قسمتی از متن
نقل قول:
دستتون درد نکنه عالی بود ولی مشکل من اینه که فاصله بین دو ستون در دو فایل اصلی من یکسان نیست برای همین حتی در صورت تشابه تمام موارد هر دو تکست باکس اما بازهم بخاطر همین فاصله بین دو ستون اونها را به عنوان تفاوت در نظر میگیره حالا سوال من اینه که چطور سورس برنامه رو تغییر بدم که فاصله بین دو ستون رو به عنوان اختلاف در نظر نگیره من سورس و دو فایل اصلی رو ضمیمه قرار می دم ممنون
خواهش می کنم...
شما اگر قصد دارید تنها ستون های اول مقادیر هر دو جعبه ی متنی رو با هم مقایسه کنید کافیه با ترکیب دو دستور Mid و InStr ستون های اول رو جدا کنید. به این شکل که در در تسکت باکس اول تا قبل از کارکتر فاصله (Space) و در تکست باکس دوم تا قبل از Chr(9) رو جدا کنید (Compare1).
اگر هم قصد دارید هر دو ستون رو در مقایسه لحاظ کنید، با دستور Replace در تکست باکس اول کارکتر های فاصله (Space) رو با Null و در تسکت باکس دوم هم Chr(9) رو با Null جایگزین کنید و سپس این دو مقدار جدید حاصل از جایگزینی رو با هم مقایسه کنید (Compare2). این طوری اون ناهماهنگی بین فاصله ی ستون ها رفع میشه.
سورس هر دو نوع مقایسه پیوست شد. دوست گرامی پیشنهاد می کنم سورس هایی که قرار داده میشه رو کامل تحلیل کنید و در تحلیلش هم اگر سوالی داشتید بپرسید و سعی کنید خودتون منطقی رو که در ذهن دارید رو پیاده کنید. چون تمام این راهکار ها در سورس های قبلی به کار گرفته شده بود ولی انگار شما هیچ توجهی بهشون نکردید و بیش تر تمایل دارید شخصی سورس آماده اش رو در اختیارتون قرار بده.
1 :تعداد فایل پیوست
پاسخ: کمک در مورد جابجایی قسمتی از متن
آره حق با شما ست دوست عزیز من تا جایی که تونستم فایلهای خروجی رو شبیه هم کردم و مشکلم حل شد خواستم بیام اطلاع بدم که شما لطف کرده بودین و زحمت سورس اون رو کشیده بودین ،می دونم زیاد سوال می کنم ولی من فقط یک هفته است که شروع کردم به کار با این زبان و مسلما تسلط شما رو ندارم بنابراین از سورس های شما برای یادگیری استفاده می کنم حالا به عنوان آخرین سوال یه کار دیگه هم می خوام این سورس انجام بده که توی فایلی که ضمیمه کردن توضیح دادم ممنون میشم در اینباره هم کمک کنید یه دنیا ممنون
1 :تعداد فایل پیوست
پاسخ: کمک در مورد جابجایی قسمتی از متن
نقل قول:
آره حق با شما ست دوست عزیز من تا جایی که تونستم فایلهای خروجی رو شبیه هم کردم و مشکلم حل شد خواستم بیام اطلاع بدم که شما لطف کرده بودین و زحمت سورس اون رو کشیده بودین ،می دونم زیاد سوال می کنم ولی من فقط یک هفته است که شروع کردم به کار با این زبان و مسلما تسلط شما رو ندارم بنابراین از سورس های شما برای یادگیری استفاده می کنم حالا به عنوان آخرین سوال یه کار دیگه هم می خوام این سورس انجام بده که توی فایلی که ضمیمه کردن توضیح دادم ممنون میشم در اینباره هم کمک کنید یه دنیا ممنون
سورس مورد نظر پیوست شد. اگر در موردش سوالی داشتید همین جا مطرح کنید.
موفق باشید
آرمین:give_rose:
پاسخ: کمک در مورد جابجایی قسمتی از متن
نقل قول:
سورس مورد نظر پیوست شد. اگر در موردش سوالی داشتید همین جا مطرح کنید.
موفق باشید
آرمین:give_rose:
ممنون دوست عزیز از توجه و صبرت ولی این سورسی که شما نوشتین چیزی که من خواهش کرده بودم نیست چون دوباره اون اعداد رو که در تایپک بالا عرض کردم به عنوان اختلاف در نظر میگیره من خواسته بودم اون مواردی که در بالا ذکر کردم رو به عنوان اختلاف در نظر نگیره یعنی در واقع نباید در خروجی موردی با ستون دوم 5-5 داشته باشیم ممنون
1 :تعداد فایل پیوست
پاسخ: کمک در مورد جابجایی قسمتی از متن
نقل قول:
ممنون دوست عزیز از توجه و صبرت ولی این سورسی که شما نوشتین چیزی که من خواهش کرده بودم نیست چون دوباره اون اعداد رو که در تایپک بالا عرض کردم به عنوان اختلاف در نظر میگیره من خواسته بودم اون مواردی که در بالا ذکر کردم رو به عنوان اختلاف در نظر نگیره یعنی در واقع نباید در خروجی موردی با ستون دوم 5-5 داشته باشیم ممنون
متوجه منتظورتون شده بودم فقط یادم رفته بود مقدار یه متغیری رو ریست کنم. سورس اصلاح و پیوست شد.
پاسخ: کمک در مورد جابجایی قسمتی از متن
عالی بود دوست عزیز دستتون در نکنه حالا اگه بخوام برعکس این اتفاق هم بیفته باید چه تغییری توی سورسی که نوشتین بدم بهتر اینطور توضیح بدم این سورسی که شما زحمت کشیدین اون مواردی رو که ستون 5-5 داره رو با اون ده مورد مشابه می گیره و در تکست باکس 4 نمایش نمیده تا اینجا عالیه حالا می خوام برعکس این مورد هم باشه یعنی اون ده مورد رو مشابه این یه مورد بگیره یعنی در واقع 10 موردی رو که مشابه با اون یه مورد هست نباید در تکست باکس 3 نشون داده بشه ممنون میشم در این مورد هم کمکم کنید ممنون (در واقع اون ده مورد در تکست باکس اول قرار دارند و اونهایی که ستون دوم 5-5 دارند در تکست باکس دوم )
1 :تعداد فایل پیوست
پاسخ: کمک در مورد جابجایی قسمتی از متن
نقل قول:
عالی بود دوست عزیز دستتون در نکنه حالا اگه بخوام برعکس این اتفاق هم بیفته باید چه تغییری توی سورسی که نوشتین بدم بهتر اینطور توضیح بدم این سورسی که شما زحمت کشیدین اون مواردی رو که ستون 5-5 داره رو با اون ده مورد مشابه می گیره و در تکست باکس 4 نمایش نمیده تا اینجا عالیه حالا می خوام برعکس این مورد هم باشه یعنی اون ده مورد رو مشابه این یه مورد بگیره یعنی در واقع 10 موردی رو که مشابه با اون یه مورد هست نباید در تکست باکس 3 نشون داده بشه ممنون میشم در این مورد هم کمکم کنید ممنون (در واقع اون ده مورد در تکست باکس اول قرار دارند و اونهایی که ستون دوم 5-5 دارند در تکست باکس دوم )
اگه منظورتون رو درست متوجه شده باشم باید الگوریتمی که برای معادل سازی اون 10 مورد به کار رفته در جهت عکس هم کار کنه. چنین چیزی میشه ولی بهینه نیست. بنده یه ترفند دیگه به کار بردم که اگر سورس پیوست رو دانلود کنید متوجه میشید.
موفق باشید
آرمین:give_rose:
پاسخ: کمک در مورد جابجایی قسمتی از متن
سلام دست شما استاد گرامی درد نکنه عالی بود دقیقا همون چیزی بود که می خواستم بازهم ممنون
1 :تعداد فایل پیوست
پاسخ: کمک در مورد جابجایی قسمتی از متن
سلام دوست عزیز من سورس یه برنامه رو قرار میدم اگه تونستید لطف کنید مشکل اون رو حل کنید مشکل من وقتی که دکمه وارد کردن 2 رو می زنم اگه در پنجره showopen گزینه cancel رو انتخاب کنم برنامه قفل میشه ،یه سوال دیگه تکست باکسی هست که سرعتش از تکست باکس خود ویبی بیشتر باشه یا راهی تو برنامه نویسی هست که سرعت تکست باکس رو زیاد کنه ممنون
پاسخ: کمک در مورد جابجایی قسمتی از متن
سلام!
1- مشکل اینجاست که وقتی کاربر CommonDialog رو Cancel می کنه هیچ فایلی برای پردازش معرفی نمیشه و برنامه خطا میده. اگر پس از نمایش CommonDialog در سورس تون کد زیر رو قرار بدید مشکل حل میشه:
کد:
If CommonDialog1.FileName = "" Then Exit Sub
2- گمان نکنم. سریع ترین راه اینه که محتویات فایل رو مستقیما" درون یه String بریزید و پردازش رو براساس این متغیر اجرا کنید؛ به عبارتی به جای اینکه هر بار مقادیر رو از درون جعبه ی متنی بخونید، داده ها رو از این متغیر رشته ای استخراج کنید.