MakeLength is working correctly. Isn't it just a font problem ? Use a fixed font instead.

For the bound combo, use the "Microsoft Databound list controls 6.0".


>Hi, thank for the advise, below is my MakeLength function code. Please kindly
>help to pinpoint my problem
>
>Public Function MakeLength(pvString As String, pvLength As Integer) As String
>
> Dim lLength As Integer
> Dim lNo As Integer
> Dim lStr As String
>
> lStr = Trim(pvString)
> lLength = Len(lStr)
>
> If pvLength <= lLength Then
> MakeLength = pvString
> Exit Function
> End If
>
> lLength = pvLength - lLength
> MakeLength = lStr
> For lNo = 1 To lLength
> MakeLength = MakeLength & " "
> Next
>
>End Function
>
>
>Finally, just like to know can I programmatically use ADO to bound to a combo
>box ?
>