Why Doesn't this code work?

VB Code:
  1. Private Sub Form_Resize()

  2. With TxtTEXT

  3. .Left = 100

  4. .Height = 100

  5. .Width = Me.Width - 100

  6. .Height = Me.Height - 100

  7. End With

  8. End Sub