تیم نرم افزاری پایگاه سایبری استان خوزستان

محلی عمومی برای انتقال دانش برنامه نویسی

تیم نرم افزاری پایگاه سایبری استان خوزستان

محلی عمومی برای انتقال دانش برنامه نویسی

تیم نرم افزاری پایگاه سایبری استان خوزستان کانال رسمی تلگرام پایگاه سایبری استان خوزستان

جهت بیان هرگونه سوال و یا دیدگاه می توانید از کاربری تلگرام زیر استفاده نمایید
Telegram: @saiber89

آپ پیسی نام گروه نرم افزاری ماست که قصد داریم در خدمت جامعه خود با رویکرد انتقال دانش برنامه نویسی و رفع مشکلات شما در ضمینه های برنامه نویسی باشیم ./

آخرین نظرات
نویسندگان

سوال مطرح شده در تاریخ 1397/09/03 ساعت 13:45 بصورت پرسش در نرم افزار تلگرام توسط سرکار خانم معینی فرد:

سلام

سوالی داشتم در خصوص طراحی گرافیک در vb.net که خیلی وقت است که بدنبال پیدا کردن جواب اون هستم

من معلم رشته کامپیوتر در یکی از مدارس شهر تهران هستم که هفته گذشته یکی از دانش آموزان از من درخواست کرد که یک دایره رنگی یعنی با شعاع های غیر همرنگ رو برای ایشون کدنویسی کنم

حقیقت امر اینکه از نظر من یک کار غیر ممکن یا حتی خیلی سخت باید باشه، هرکجا رو که جستجو کردم جوابی پیدا نکردم، تا اینکه یکی از همکاران وبسیت شمارو پیشنهاد داد

اینجا رو که سر زدم متوجه شدم سوالات رو جواب میدید، ازین حیث سوال کردم و امیدوارم بتونم جوابی از شما کسب کنم

با تشکر از زحمات شما و تیم نرم افزاری شما

سرکار خانم معینی فرد


پاسخ کارشناس: 
*در نرم افزار پیام رسان تلگرام: سلام، پاسخ پس از انتشار در وبلاگ بصورت لینک حضورتان ارسال خواهد شد.

باعرض سلام و احترام حضور شما معلم گرامی
این افتخار بنده است که از خداوند منان توفیق پاسخ گویی به سوالات شما هموطنان گرامی را دارم، در خصوص پاسخ به سوال مطرح شده شما یکی از روش های مورد استفاده ، بکارگیری توابع sin و cos در کد برنامه است بدینصورت که در محور x  ها از Cos و در محور y ها از Sin استفاده بشود.
بطور کلی کد مرتبط با ایجاد یک دایره یا بطور واضح تر ایجاد شعاع هایی در کنار هم جهت تشکیل یک دایره نیازمند دانش ریاضی است فلذا ما برای پاسخ به سوال شمااز توابع مرتبط با ریاضی استفاده می کنیم.

1-   x را شاخصه محور افقی و y  را شاخصه محور عمودی در نظر می گیریم.
2-   a را نقطه شروع در محور x ها و b  نقطه شروع دایره در محور y ها در نظر میگیرم.
3-   r را طول مورد نیاز یا در واقعه شعاع دایره در نظر میگیریم.
4-   زاویه ᶿ تتا به عنوان گردش به دور دایره است


      Dim col As Color = Color.FromArgb(Rnd() * 255, Rnd() * 255, Rnd() * 255)
این کد سبب ایجاد یک رنگ تصادفی در متغیر col میشود

     Dim x As Integer = e.Location.X
     Dim y As Integer = e.Location.Y

نقاط شروع دایره را مشخص میکند.

     Dim p1 As Integer = x + r * Math.Cos(t)
     dim p2 As Integer = y + r * Math.Sin(t)

این دو قطعه کد در واقع نقطه قرارگیری شعاع دایره را مشخص میکند.


Dim p As New Drawing.Pen(col, 2)
                Me.CreateGraphics.DrawLine(p, x, y, p1, p2)

در خط کد اول ما یک قلم را با رنگی که قبلا در مورد آن صحبت کردیم و همچنین پهنای 2 ایجاد میکنیم و در خط دوم اقدام به ایجاد یک خط درون فرم کاری می نماییم می توانیم بجای فرم از Picturebox نیز استفاده کنیم

Dim t As Double = 0
Dim r As Integer = 200


                Dim col As Color = Color.FromArgb(Rnd() * 255, Rnd() * 255, Rnd() * 255)

                Dim x As Integer = 50
                Dim y As Integer = 50

                Dim p1 As Integer = x + r * Math.Cos(t)
                Dim p2 As Integer = y + r * Math.Sin(t)

                Dim p As New Drawing.Pen(col, 2)
                Me.CreateGraphics.DrawLine(p, x, y, p1, p2)
                t = t + 0.01


با هربار اجرای این قطعه کد مقدار 0.01 تغییر در خط شعاع ایجاد می نماییم.

باتشکر
پاسخگویی رایگان به سوالات کاربران

انتشار در واتساپ

*****

انتشار در تلگرام


/h2>

  • افسر سایبری

circule

vb.net

نظرات  (۰)

هیچ نظری هنوز ثبت نشده است

ارسال نظر

کاربران بیان میتوانند بدون نیاز به تأیید، نظرات خود را ارسال کنند.
اگر قبلا در بیان ثبت نام کرده اید لطفا ابتدا وارد شوید، در غیر این صورت می توانید ثبت نام کنید.
شما میتوانید از این تگهای html استفاده کنید:
<b> یا <strong>، <em> یا <i>، <u>، <strike> یا <s>، <sup>، <sub>، <blockquote>، <code>، <pre>، <hr>، <br>، <p>، <a href="" title="">، <span style="">، <div align="">
تجدید کد امنیتی