Resize textbox in continuous forms

[GKWilly]

I hope someone can help with this strange and probably easy problem I have.

I have a field in a continuous form that displays various lengths of data. I want the user to be able to change the width of the field (by double clicking) if there is more data that they wish to see.

I thought I'd managed to do this untill I realised that my code will only resize the field of the current record!!
the code I'm using is simply:....

Private Sub LAD_Title_DblClick(Cancel As Integer)
If LAD_Title.Width = 3993 Then
LAD_Title.Move Left:=4068.225, Width:=7278.012
Else: LAD_Title.Move Left:=4068.225, Width:=3992.814
End If
End Sub

Can anyone see where I've gone wrong?

Gone Drinking

 

[missinglinq]

The easiest thing to do would be use the ZoomBox function. In the DoubleClick event for your field place this code:

DoCmd.RunCommand acCmdZoomBox

This also allows for the easy entering of data when it runs longer than the text box can display.

The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!

 

[GKWilly]

Thnaks missingling,

I'm kinda hoping I can get round the problem without using the zoom control though.

Gone Drinking