PDA

View Full Version : سوال: ساخت دایره های تصادفی



behzad004
پنج شنبه 08 آبان 1393, 16:10 عصر
سلام دوستان من میخوام ی کد بنویسم که دایره های تصادفی با مختصات تصادفی بذارم یک دایره نمیخوام چندین دایره یکی یکی بیاره ی تایمر بذارم و اینترولش رو برابر 1000 بذارم هر ثانیه یک دایره ایجاد کنه
Dim myPen As Pen

myPen = New Pen(Drawing.Color.Blue, 5)

Dim myGraphics As Graphics = Me.CreateGraphics

Dim myRectangle As New Rectangle

myRectangle.X = 10

myRectangle.Y = 10

myRectangle.Width = 100

myRectangle.Height = 100

myGraphics.DrawEllipse(myPen, myRectangle)


تو این کد فقط ی دایره ایجاد میشه چطوری مختصات رندوم بدم ؟؟؟