راهنمایی در رسم دوایر و چند ضلعی

[maryam.s]

سلام دوستان معذرت عنوان اگه نا مناسبه من دو تا پروژه دارم به زبان vb می خوام دوستان توضیحی بدن که به چه صورت باید اینو بنویسم ممنون میشم ریتم کلی رو واسم بگین

[/URL][URL="http://imgeup.com/viewer.php?file=n43xwtky7rr3tcssnnsz.jpg"]http://imgeup.com/images/n43xwtky7rr3tcssnnsz_thumb.jpg (http://imgeup.com/)

[ENG_Torshani]

سلام دوستان معذرت عنوان اگه نا مناسبه من دو تا پروژه دارم به زبان vb می خوام دوستان توضیحی بدن که به چه صورت باید اینو بنویسم ممنون میشم ریتم کلی رو واسم بگین

[/URL][URL="http://imgeup.com/viewer.php?file=n43xwtky7rr3tcssnnsz.jpg"]http://imgeup.com/images/n43xwtky7rr3tcssnnsz_thumb.jpg (http://imgeup.com/)

این صفحه را مطالعه کنید کامل مشکلت حل میشه

http://www.bigresource.com/VB-Draw-Circle-HlLM3K0ONe.html

[ameri110]

با این کد میتونی تو یه پیکچر باکس دایره رسم کنی

dim radius as double
dim bucle as long
dim x as double
dim y as double

radius = 2500
Picture1.Cls

For bucle = 1 To radius
X = Sin(bucle) * radius
Y = Cos(bucle) * radius

Picture1.PSet (((Picture1.Width / 2) + (X + radius)) - radius, ((Y + radius) + Picture1.Height / 2) - radius)
Next bucle

برای رسم چندضلعی هم باید ابتدای هر خط انتهای خط بعدی باشه