با سلام
مر 30 از جوابتون
در حقیقت من از کد زیر برای ترسیم استفاده میکنم
dim Code(0 to 500,0 to 12)as string
در چهار خانه اول مختصاتها و پنجم اندازه و... و دوازدهم ضخامت خط قرار دارد
حال با استفاده از حلقه و دستور Line در یک فرم خالی اقدام به ترسیم خطوط می شود.
ابتدا و انتها هم با استفاده از حلقه و گرفتن مختصات موس و دستور شرطی خطا انجام میشود
به علت اینکه خط ها بهم متصل هستند و در اکثر مواقع X2,y2 خط اول با x1,y1خط دوم برابر هست نمیتوان خط مورد نظر را به این وسیله انتخاب کرد(بعضی وقتا اولی انتخاب میشه و گاهی دومی و کار جالبی نیست!)
به همین دلیل در صدد راهی برای تشخیص یک خط به تنهایی امدم
یک راه استفاده از حلقه و استفاده از مختصاتها و ایجاد فرمول خط و چک کردن مختصات موس درون ان با خطای کم هست که خود مشکلاتی از قبیل عدم شناسایی شیب بینهایت در وی بی است.
حال به دنبال راهی برای این کار می گردم!؟!؟