concat and truncate

[Lapchien]

I'm concatenating 4 fileds:

Private Sub Form_BeforeUpdate(Cancel As Integer)
On Error GoTo Err_BeforeUpdate
txtDoIt.Value = Left(INV_NUMBER.Value & " " & Combo65.Column(1,
Combo65.ListIndex) & " " & Text131.Value & " " & Text129.Value, 29)
Exit_BeforeUpdate:
Exit Sub
Err_BeforeUpdate:
MsgBox Err.DESCRIPTION
Resume Exit_BeforeUpdate
End Sub

However, Text131 needs to be truncated to 15 characters - is it possible to
do within this bit of code (which is on the before_update event of my form).

Thanks,
Lap

 

[RobFMS]

Set Text131.Value as follows:

Left(Text131.Value, 15)

This will take the first 15 characters.

--
Rob

FMS Professional Solutions Group
http://www.fmsinc.com/consulting

Software Tools for .NET, SQL Server, Visual Basic & Access
http://www.fmsinc.com

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

 

[Chris Carswell]

Thank you.

Set Text131.Value as follows:

Left(Text131.Value, 15)

This will take the first 15 characters.

--
Rob

FMS Professional Solutions Group
http://www.fmsinc.com/consulting

Software Tools for .NET, SQL Server, Visual Basic & Access
http://www.fmsinc.com

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-