Zrýchlenie písania a preh¾adnosti kódu pomocou With

With TextBox1
   .Text = "Text v prvku TextBox1"
   .Left = 0
   .Top = 0
   .Enabled = True
End With