Putting Tabs into a string?? 3

[ftpdoo]

Hi

I have a string which contains a value as can be seen below. The problem occurs when different length of "strType" is enter and thus messes up my alignment of "strDesc"!

Code ==========================================================
strString = "" & strType & " (" & strDesc & &quot"
==========================================================

So strString displays the following:

Type (PK12321)
Typedddddd (PK12321)
Typeddd (PK12321)

HOW COULD I KEEP THE TEXT IN THE BACKETS LEVEL?? Is it possible to add a tab???

Thankx,
Jonathan

 

[juanferman]

Try using:

strString = "" & strType & chr(9) & " (" & strDesc & &quot"

But if you want to show the results on HTML the TAB will be replaced for just one space.

I think you can resolve this printing out the results in a table.

 

[ftpdoo]

Hummm... Still having Problem???

I've tried the following:

===========================================
Dim intLength As Integer
Dim intLength2Add As Integer

intLength = Len(pfType)
intLength2Add = 30 - intLength

strSPACES = String(intLength2Add, " &quot
===========================================

to put in the exact number of spaces required?? But the items are still not aligned...

Any idea's??
Jonathan

 

[juanferman]

Doesnt matter how many spaces you included in the string always will show just one.

I still thinking on use a table.

 

[juanferman]

You can replace the space for   (non-breaking space) but if you do so, you have to use Courier as a font type.

 

[dsi]

Instead of Chr(9), you could use the VB constant vbTab. It makes it a little easier to read your code.

 

[Mossoft]

I read somewhere about using TextWidth method to determine width of a given piece of text then using a calculated width graphics object to pad out the line before the next bit of text. I think it was in Word but cannot remember the details. :-(

M