Делаем тень для Label`a на VB

Войди в VB(Standart EXE) - на форму кинь 2 метки, и 1 текстовое поле. Выдели 2 метки и поставь у них свойство BackStyle = 0 - Transparent, и свойство AutoSize = True. Первую метку сделай серой(ForeColor), но так чтоб она не сливалась с формой. Код:

Private Sub Form_Load() 'При загрузке формы:
Label1.Left = Label2.Left + 70 'Метка 1(тень) была немного правее метки 2
Label1.Top = Label2.Top 'Делаем их на одной высоте
Label1.ZOrder (1) 'Делаем метку 1(тень) под меткой 2
End Sub

Private Sub Text1_Change() 'При изменении текста:
'Текст у всех меток тоже меняется
Label2.Caption = Text1.Text
Label1.Caption = Text1.Text
End Sub