resizing

[ZeroCool]

Why Doesn't this code work?

Private Sub Form_Resize()
With TxtTEXT
.Left = 100
.Height = 100
.Width = Me.Width - 100
.Height = Me.Height - 100
End With
End Sub

[ZeroCool]

Does The Textboxes .With Not Include the Scrollbars?

[Edneeis]

Are you trying to move it off of the form?

That's what that code looks like it does because it refers to ME (the form).

Are you getting an error? How does it NOT work?

[Edneeis]

Nevermind I see you are moving it to the bottom right corner.

[ZeroCool]

I Want the textbox 100 away from all sides of the form (Centered)

[Edneeis]

Private Sub Form_Resize()
     TxtTEXT.Move 100, 100, Me.ScaleWidth - 200, Me.ScaleHeight - 200
End Sub

[ZeroCool]

Thanx Edneeis