تمامی مطالب مطابق قوانین جمهوری اسلامی ایران میباشد.درصورت مغایرت از گزارش پست استفاده کنید.

جستجو

ایجاد دایره اتوماتیک

    ساخت دایره ها باحالت های مختلف در ویژوال بیسیک

    ابتدا یک تایمیر ایجاد کرده و سرعت ان را بر روی 250 قرار دهید

    سپس کد زیر را در آن ایجاد کنید




    Private Sub Timer1_Timer()

    WindowState = 2
    DrawWidth = 5
    FillColor = QBColor(Rnd * 15)
    FillStyle = Int(Rnd * 8)
    Circle (Form1.Width * Rnd(), Form1.Height * Rnd()), 450

    End Sub



    این مطلب تا کنون بار بازدید شده است.
    ارسال شده در تاریخ شنبه 26 اسفند 1391 [ گزارش پست ]
    منبع
    برچسب ها : ایجاد ,
    ایجاد دایره اتوماتیک

پربازدیدترین مطالب

آمار امروز سه شنبه 4 مهر 1396

  • تعداد وبلاگ :55472
  • تعداد مطالب :149693
  • بازدید امروز :685349
  • بازدید داخلی :64487
  • کاربران حاضر :142
  • رباتهای جستجوگر:462
  • همه حاضرین :604

تگ های برتر