Option Explicit
    'на форме метка lblUnit - Index = 0 и таймер
    Dim MouseLeft As Single
    Dim MouseTop As Single

Private Sub Timer1_Timer()
    MoveUnits
    lblUnit(0).Left = MouseLeft
    lblUnit(0).Top = MouseTop
    lblUnit(0).ForeColor = RGB((Rnd * 255), (Rnd * 255), (Rnd * 255))
End Sub
Private Sub MoveUnits()
    Dim i As Long
    For i = lblUnit.Count - 1 To 1 Step -1
        lblUnit(i).Move lblUnit(i - 1).Left + lblUnit(i - 1).Width + 50, lblUnit(i - 1).Top
        lblUnit(i).ForeColor = RGB((Rnd * 255), (Rnd * 255), (Rnd * 255))
        If i = 1 Then
            Me.DrawWidth = (Rnd * 3) + 1
            PSet ((Rnd * Me.ScaleWidth), (Rnd * Me.ScaleHeight)), &HFFFFFF
        End If
    Next i
End Sub

Private Sub Form_Load()
    Dim i As Integer
    With lblUnit(0)
        .FontName = "Comic Sans MS"
        .FontSize = 16
        .Caption = ""
        .AutoSize = True
        .BackStyle = 0
    End With
    Timer1.Interval = 50
    Me.BackColor = vbBlack
    Me.WindowState = 2
    lblUnit(0).Caption = "С"
    lblUnit(0).ForeColor = vbRed
    For i = 1 To 17
        Load lblUnit(i)
        With lblUnit(i)
            .Left = lblUnit(i - 1).Left + lblUnit(i).Width + 50
            .Top = lblUnit(i - 1).Top
            .Caption = Mid(" новым 2006 годом", i, 1)
            If .ForeColor = vbBlack Then .ForeColor = vbRed
            .Visible = True
        End With
    Next i
    Timer1.Enabled = True
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    MouseLeft = X + 120
    MouseTop = Y - 360
End Sub

]]]]]]55]]5]]]]]]]]]55]]]]]]]]]]]]]]]]]]]]]]]]]]]&]&]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]&&&&&&&&&]]]
]]]]]]]]]]]]]]]]]]]]]]]&&&&&&]&]]]]]]]]]]]]]]]]]599D999DAA999D5]]]]]55]]&&&&&&&&&]&&]]]]]]]]]]]]]]]]
]]]]]]]&]]]]]]]]]]]]]]&&]]]]]]]]]]]]]]]]]]]]]]5AHNNNHH@ABH@BB@@D9D5555]]]]&&&&&&&&&]]]]]]]]]]]]]&&&]
]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]&]555]5D@H@@HNNNHAAHH@BHHHN@D5]]]]]]]&&&&&&&]]]]]]&&&&&&&&&&&
]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]5ABAAAAAADA@HHHH@A@H@@BHHNN@B5&&&&&&&&&&&&&&]]&&&&&&&]&&]]&&
]]]&&&]]]&]]]]]]]]]&&&]]]]]]]&&&]]&]55]5BHNBH@HHBADDBH@@HBAH@@@DBHNHH@5&&&&&]]]]]]&]]&&&&&&]]]]&]]&&
]]]]&&&&&]]]]]]&&]]]]]]]]]]]]]&]]]]]555A@HHBBH@NNADAAAHH@HBBH@NBD@H@NHBD5&&&&&&]]]]]]&&&&&&&]&&&&&&&
]]]]]&&&&]]&&&&&&&]]]]]]]]]5]]]]&&&]]]BBABB5@BHNB9D@AAHHB@9@@HH9AH@NNH@B95&&&]]]]]]]&&&&&&&&&&&&&]&
]]]]&&&&]&&&&&&&&&]]]&&&&&]]]&&&&&&&5B@BDADHDDD9HAAAABD@@@@A5HHHB9@@HNH@HHB]&&]]]]]]]]]&&&&&&]]]]]]&
]]]&&&&&&&&]]]]]]]]]&&&&&&]]]]&]]]]5B@@B5A9A@95=BD5@BBBD@BH@5DHH@DAHHHH@@@H5]]]]]]]]]]]]&&&]&&&]&&&]
]]]]&&&&&&&&&&&]]]]&&&]]]]]55555555DAAB@9DA5B9D]A9&BADB9ADB@B5D@@HA@@@HBHHHD]]]]]]]]]]]]]]]&&&&&]]&&
]]]]]]]]]]]]]]&&&&&&&&]]]]]]]555555DDB@@B9BDD995DD5BB9AD9DDDAAD@B@BBBB@A@HH@D]]]]]&&&&&&&&&&&&&&]]]]
555555555]5555]]]]]]]]]]]]]]]]555]DA@@@HBABA99D9DDDBAAD95]59DABDDDDDDADA@HBA5]]]]]]]]&&&&&&&&&&&&&&
55555]]]]]]]]]]55]]]]]]]&&&]]]]]&5AA@@@HHHBAADDD55D9DD99955=99A95]55]559D@@BHA55]]55]]&&&&&]]&]]]]]&
]]]]&&&&&&&&&&&]]]]&&&&&&&&&]]]=&BHHHHHH@B9555]]&&&&&=:=&&&&]]&=====&]55DABH@5]]]]&&&&&&&&&&&&&&&&]
&&&&&&&&&&&&&&&&&&&&&&&&&&&&]&&&]HHHHHH@BA95&&==:::::,,..,=&====:====&]59AHH@D&&&&&&&&&&&&&&&]]&&&&
]]]]]]]]&]]]&&]]&&]]]]]]]]&&&==&&A@BHHHH@BD5]&&=====:::,,..,:=::=====&&]5DBHH@9&&]]&]&&&&&]]]]]]]]]]
]]]]]]&&&&&&&&&&&&&&&&]&&&&]&:=&]AH@B@HH@AD5]&&&==&===::,,,,::::==&&&]]559B@H@&&&&&&&&&&&&&&]]&&&&&&
&]]]]&&==&&&&&&&&&&&&&&&&]]&==:&]@BHNH@@@A9]]]&&&&&&===::::::::==&&]]5599DA@HA&&&&&&&&&&&&&&&&&&&&&=
&]]]]]]]&]]]]]]]&&&&&&]]]]]==:=&]B@@@HH@BA9]]]]&&&&&&===:=======&&&]]5599DAHH5&&&&&&&&&&&&&&&&&&&&&&
]&]]]]55]]]]]]]&&==&&&]]]]&&=,&&]BDB@HH@BD5555]&&&&&&&&===&&&&&&&&]]5559DDB@HA&&&&&&&&&&&&&&&&&&&&&=
&&]]&&]]&&&]]]]]&==&&&&&&&==:,]=&@@DBHH@D55555]&&&&&&&&======&&&&]]]5559DABH@D5]]&&&&&&&&&&&]]]]&&&&
]]]&&&&&]&&&]]]]]&&&&&&&&=::,:&=&9ADAB@B99555]]&&=========&&&&&&&]]]]]59DB@HA555]]]]]&]&&&&]]]]]]]&&
]]]&&&]]&&&&&&&&&&&&&&&]&==:.===&&&&5ABA995555]]]&&]&===&&&&&&&&&&=&5559AB@A]55]]&&&&&]]]]]]]]]]]&&&
]]]]]]]]]]]&&&&&]&]]&&&&&==..====&=&=5AD99555555]55DABA9]]&&&&&&]59AAD9DABB9&&==&&]]]]]]]]]]]]]]]]]]
55555]]]&&&&&&&&&&&&&&&&&=:``=:::&:&=:]9995555DBHHHHH@H@A9]]&]9DB@HH@@BBBBB]]]555]]]]]]]]]]]]]]]]&&&
]]]]]&&&&&&&&&=&&&&&&&&&==:..::,,=:=&&:]995]&&]9BDAA5]9995&&5AH@@@BAHH@AA]=&&&&&]&&&&&&&&&&&&==&&&=
&&&&&&&&&&&&&&&&&&&&&&&&&=,``,,.,:==&9DD999]&===]55595&=&]&=&5D9]599DDD595=&&&&&&&&&&&&&&&&&&&&&&&&&
&&&&]&]]&&&]]]]&&&&]]]]]=,,`..,,.:&=]9AA9595&=====&&&====&&:=55&&&]]5]&]5]]]&&&&&]&&&&&&&&&&&]&&]]]]
]]&&&&]]]&&&&&&&&&&&&&]&::.``.,.`:&=]&]59555]&===:::::::=&===]]&&=====&595]]&&&&&]]&&&&&&&&&&&&&&]]]
&&&&&&]]&&&&&&&==&==&&&=::...,,.`,&:]&]]9955]&&===:::::====:=]]&=====&]99]]]]]]]]]]]]]]]]]]]]]]]]]]]
&&&&&&&&&&&&&&&&&&&&&]&==:..`,,.`.=,]]5=59955]&&===&]]&&&==:=]]]]&===&5D5]]]]]]]]&&]]]]]]]]]]]]]]]]]
&&&&&&&&&&&]]]]]]]]555&==...`,,.`,=:&]]:]99955]&&5DD5]===::=]]5DD]]]5DD]]]55]]&]]]]]&&&&&&]]]]]]]]]
]]]&&&]]]&&]]]]]555555&=....`:,.`,::=&=:&9DD999DAB9]&995&=:=]A9AAD9DD&&&&]]&&&&&]]]]&&&&&]]]]]]]]]
&&&&&]]&&&&&&&&&&&&&]&=,....`:,.`,=:=&:=:DAD9999A@B5&:&BBD5DB@ADADDDA]=&&&&&===&&&&======&&&&&&&&&&
]&&&&&&&&&&&&&&&&&&&&=:,.,...,,.`.=:=::::5@AD995]]5ABDD5DBHHHHH@A5&5D5&&&&&&&&&&&&&&&&&======::=====
]]]]&&&&&&&&&&&&&&&&&::.,,.`.=:..,:,=,,:=&@A9995]&&55DD5&9A@@BD5]5D5&]]]&]]&&]]&&&&]]&&&&&&=&&&&&&=
]]]]]]]&&]]]]]]]]]]]&,..=,.`.5:,,::==,.::::DHBD95]&]]5&&]&]9DDD559D5]]]]]]&]&&&==&&&]]]]&]]&&&]]]]]]
]]]]]]]&&]]]]]]]]555&:`::..`:],,,,:&&=:,:,::AH@D95&&&5955555DD9599]]]]]]]]&&]]&&&&&&]]&&&]]]]]]]]]]]
&]&&&&&&&&&&&&]]]]]]],.&,.,`&&,,,:::&=::,,::,BH@AD5&&=]59DDD9]]A5&&=&&&]&&&]&&]]]]]]]&&&]]]]]]]]]]]
&&&]]&&&&]]]&&&&&&]]],:=,:,.5=::,==:==::::::.&B@@BA9&=:::====&HHH@BAD55]&&&&&&&]]]]]]]]]]]]]]&&]]]]
&&&&&]]]]]]]]]]&&&&&&:=,&=,:9:::,==:=:::=::,,:]B@@BD5]&&&&]5BHHHHHNNNHHA&]]]]&]&&&&]]]&&&&]]]]]]]]&
&&&&&&]&&&]]]]&&&&&&]:=55:,=5:=::&=:=,,::::..=]&9B@@@BBADDAB@HHHHHHHHHHH5&&&=========&]5]&&&&&&]]&&&
=&&]]]]]]]]]]]]]]5555=9A5&&&]::==&&::,:=,:,.,&]:5DB@@@@@@@@@@HHHHHHHHH@9&&=:::::======&]]55]&&&&&&&&
==&&&]]]]]]5555]]]]5]]A9]]&]=,:&===,::::,:,,=]=:]]ABBBB@@@@@HHHHHHHH@D]&&=::::::=======&&]555]&&&]]&
]&]]&&]]]]555]&&====&5B9]5=&:,=&==::=:.:,,:&]]==]]]BBBBB@@@HHHHH@A9]&&&===:,,:::::::::==&&]555]]]]]
&&&&&&&&]55]&&&=&===&9B555=&:=5=&=,:=,,:,,=5===&]&&&BBBB@HHHHNHA55]]&=&&&::,,,,,,,,,,,::==&]55]]&&&
&]]]]]]55]&&&&&=&===&9]&59]=:]&=&=:&:.::::&=:&&&==&=:]B@@HHHHB9]]]&=&&&&&=:,,,,,,,,,:,:::==&59]&&=&
]]]]]]55]&&====:=:==]5=]99]&=&]]::=]:,,==:]=&5&]&&&=:::&55955]&&&&===&&]&&=:,,,,,,,::::::===&]95&&&&
&]]]]59]]&==:::,,:==]]=5559]&=5]::=&:,&===]=&==5&&====:::::=&=====&&&&&&&&==:::::::::::::===&]95&&&&
&&&&]95]&=:::,,,:===&]]5&&55]&&]::&=,:&=,===::==,:=====:::::==&&&&&&&&&&&&&&==:::::::::::===&]59=&&&
]]]&]9]&&=::::::==&==&]]==&]]]&&::&=,::]:=::=:::,,:::::::::==&&&&&&&&&&&&&&&&========:======&]59=&=&
]]]]59]&&=:::::==&&&=&]]===&=D5=:=]&,:&:=&::=:=:,,,::::::::==&&&&&&&&&&]]]&&&&&=============&]59]]]]
]]]]95]&&==::::==&&&==&&=:=&:DD]:&=&=:&:::=:::::,,,,,:::::::===&&&&&&&&&&&&&&&&&&&&&&=&=====&]595]]]
5]]595]&&==::::===&====&=:=&=]5&===:&:&=]:::::,:,,,,:::::::==:===&=&&&&&&&&&&&&&&]]]&&&&====&&]9]===
]]]59]&&=================::=&=&&&=::]===]&::::::::,,:::::::::=========&&&&&&&&&]]]555]&&=====&]9]=&=
&]]99]&&=================::===&&]:::&&::]&:=::=::::::::::::::::::======&&&&&&&]]]59D95]&&====&]55&&&
]]595]&&========&===&&&&&&:=::&&&&::]&=:=&==:&=::::=:,,:::,,:::::::=====&&&&&&]]55DAD5&&&====&]55&&&
]]995]&&===========&&&&&]&===:=&&&]:&=&=::==&&=::::=,,,,,,,,,,,::::=====&&&&&&]]599AD]&&====&&]55&&&
5]995]&&&========&&&]]]55]&==:&&==5:=&]=&==&]=::::::::,,,,,,,,,:::=====&=&&&&]]559DA5&&=====&&]59&&&
]]99]]&&=========&&&]5999]]&=:====]]:&&&:]:5&===::::::::,,,,::::::====&&&&&&]]]559DD]&======&&]59&&&
&&99]]&&&&=======&&&]D99]]]&&=::&=&]&=]:]&]========:::::,,::::::::====&&&&&]]]559DD&========&]59&=&
55D9]]&&&&=====&&&&]5DBD55]]=&=:==::=]&&:&]&===========::,,:,,,,::::====&&&&]]]559D9&&======&&&5D&&&
]5D9]]&&&&&&===&&&]]5ABD55]&=&:=&::=:=&&==&&&==&&=======:,,,,,,,,,,::====&&&&&]]5999&========&]5D]&&
&]9]]&&&&=&&&=&&&&]5ABD955&=&=&&::::=&&=&]&&&&=&&&&&====:,,,,,,,:,::::===&&&&]]559D5&=======&]5D&==
&&99]]&&&=&=&==&&&&]5A@A995]=&=&===:=&===&5&&&&&&&&&&&&&=::,,,,,,:::::::====&&&]]59DD]====:==&]5D&==
]&99]]&&&=&==&=&&&&]5D@AD955&&&&==&==&==&&]&&&&&&&&&&&&&=::,,,,,,:::::::::====&&&&5DDA]==:====&5D]&&
]]99]]&&&&=&=&=&&&&]5ABAD9555&&]&&&&===]&&&]&&&&&&&&&&&&&=:,,,,,,,,::,:::::::=====&]59D&:::===&5D]&&
&&99]]&&&&===&=&&&&]5ABDDD955]]5&&====&]&&&]&==&&&&&&&&&&=:,,,,,,,,,,,,::::::======&]5DA=:====&5D5&&
&&59]]&&&=====&=&&&]5BA9DD95]]9]&&&&]]55&=&]===&&&&&&&&&&=:,..,,,..,,,,,,::::======&]9DB5:::==&]95&&
&=5D5&&&======&&&&&59BADDD95]]]&&&]59955]&=&=======&&&&&&&=:..,,,,,,,,,,,,:::::===&]]59AD=::==&]95&]
==]5]&&=======&&&]59@ADDD95]]&&]595D9555=:=::=====&&&&&&&=:,,,,,:,,,,,,,,:::====&&]]559D=::=&&]95&&
&&]5]&&========&&]]9@ADDA95]&&&]995DD9]&=:::::====&&]]]&&=:,,,,:,:,,,,,:::::====&&&]55DD=::=&&]95&&
]&5D5]&==========&]]9@ADDAD55]]&]5555]]&:::::::====&&]]]&==:::,,::::::::::=:====&&&]559DD::==&&]95&&
&]59]&&&========&&&]9@BDDAD95]]&&&]]&&==:,::::====&&]]]]&==:::,:::::::::========&&]]559AD::=&&]]95&&
&&]9]]&&&=======&&&]9@BADAA955]]&&&&==::::::::===&&]]5]&===::::::::::=====&&&&&&&]]559DBA::=&&]]95&&
]]]9]]&&&=======&&]]9A@ADDBD955]]]&&&====::=====&&&]]]]&==:::::::=======&&&&]]]]55559AB@9,:=&&]595&]
]]595&&&&=======&&&]99AADDDBA955]]]&&&&&=====&&&&&]]]]&===::::========&&&]]5555999DDA@H:==&]]5D5]]
55595&&&=========&&]959BDD9ABAD955]]]]&&&&&&&&&]]]]]]&==:::=:========&&&]]559DAABBB@HHH9,::=&&]59]&&
]5595]&&=========&&]99]BAD95A@BDD9555]]]]]]]]]]]55]&&==:::::=========&&&&]5559DB@@HNNHB:::==&&]99&&&
&]&99]&&&========&&]95&AD955DB@BAD9955555555555]]&===::::::====:=====&&&&]]559DAB@NN@&,:::=&&]99]]]
]]]99]&&&&=======&&]95&5BD995]]9B@BBAADDDDDD995]&===::::::::==::::=====&&&]]559DDDBN@]::::==&&]95&]]
5]]995]&&&=&&&===&&]95=]AA9995]&]5DABBADD995]]&===::::::::============&&&]]]559DDDB@]==::::=&]]]&&]
]]]5D5]&&&==&&==&&&]95&&B955555]&&&]]55]]&&===:::::::::::============&&&&]55599DDA5&&==:::=&]5D]&&&
]]&]5]&&&=&====&&&]9]]5B955555]]&&&&&&&&&&==:::::::::::::===========&&&&]]5559DDA5&&==:::==&59]==&
]]]5D95]&&&&&&&&&&]5D9]]]AD955]5]]]&&&&&&&&===:::::::::::==============&&&]]5559DAA9&====:::=&]9]::=
]]]5D95]&&&&&&&&&&]5A5]]]9A955]]]]]]&&&&&&&==::::::::::::==============&&&]]]55DAAA9&&===::::=&5]::=
]]]]995]&&&==&&&&]59A]=&&5AD55]]]]]]]]&&&&&==:=::::::::===============&&&&]]]59DAAD9&&&==::,:=&59]&]
]]&&9D5]&&&==&&&&]59D&=::=DD95]]]]]]]]]]]&&&===:::::::=======:=======&&&&&]]]59DAAA9&&&&=:,,,=&]95]]
&&&=9D5]&&===&&&]]59D]5]&=9D55]]]]&]]&]]]]]&&==:::::=========:======&&&&&]]]]59DAAA9&&&&==:,,=&]5]=&
==&&9D5]&=====&&]5599]]]]]5A55]]]]&]]&&&&]]&&&&=:::=================&&&&]]]]559DAAA9&&]&&==::==&55&&
&&&&9D5]&=====&&]5599]]]]&]95]]]]]&&]&&&&&&&&======================&&&&]]]555DDAAA9&&&&===:::=&55&&
]&&&9D5&&====&&&]5599&]]]]&5D55]]]]]]]&&&&&&&======================&&&&&]]5599DAAAD9]&&&==::::=&5]==
]&]&5D]&======&]55599]]]&&&5D55]]]]&&&]&&&&&&======================&&&&]]5599DDDAAD9]&&&=::,,==&5]=&
]]]]59]&===:==&]55599]]]]]]5A55]]]]]]&&&&&&&&=====================&&&&]]]5599DDAAAD9]&&&=::,,=&&55]]
=&&]59]&===:=&&]555DD]]]5555D95]]]]]]&&&&&&&=========::==========&&&&&]]5599DDDAAD9D]&&==:,,:=&]95&&
&&]]59]&=====&&]595D9]]55559D55]]]]]]]&&&&&===::=================&&&&]]]599DDDDAADDD]&==::,,:=&]5&&
]]]]9D]&=====&&]599D9]5]555DA95]]]]]]]]]&&&======================&&&&]]5599DDDADDDDD]&==::,,==&]95]
55]5DD5&=====&&]599D9]]]]]DD95]]]]]]]]]]&&&&==================&&&&&&]55999DDDDDD9D9&===::,:=&&5D9]]
55]5DA5&======&]599A9]]&=DDD95]]]]]]]]]]]&&&&&================&&&&&&&]]599DDDDDDD9D5&===:,,:=&]599]]