behzad004
پنج شنبه 08 آبان 1393, 17: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)
تو این کد فقط ی دایره ایجاد میشه چطوری مختصات رندوم بدم ؟؟؟
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)
تو این کد فقط ی دایره ایجاد میشه چطوری مختصات رندوم بدم ؟؟؟