I cannot connect to server Could not Connect to database ایجاد دایره اتوماتیک

جستجو

تبلیغات



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

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

    ابتدا یک تایمیر ایجاد کرده و سرعت ان را بر روی 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



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

تبلیغات


    تبلیغات شما در این قسمت

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

آمار امروز جمعه 4 فروردين 1396

تبلیغات

محل نمایش تبلیغات شما

تبلیغات

محل نمایش تبلیغات شما

آخرین کلمات جستجو شده

تگ های برتر