Hi
i need to write double number to a fixed lengh, es.:

3    ->  3.00
3.3 -> 3.30

i use format
Format(Text, "00.00")
but it isnt ezactly what i need, this returns:
text=3.3    format-> 03.30 i need <blank>3.30
do you know what have i to write???
i tried Format(Text, "##.0") but it doesnt work
thanks
carlo



thanks
carlo

Use....

Format$(YourNumber, "0.00")

That ensures a leading 0 and 2 decimal places.

3 will be 3.00

point 3 will be 0.30

9993.3 will be 9993.30

etc.

thanks a lot
but this isnt what i need

i solve the problem in this way:
        sRiga = sRiga & String(7 - Len(Format(.Text, "0.00")), " ") &
Format(.Text, "0.00") & vbTab

thanks
carlo


Show quoteHide quote

You are trying to right-justify the value in a 7-character field?  Maybe
something like

sRiga=Format$("###0.00",CSng(.Text)) & vbTab

or

sRiga=Right$(Space$(4) & Format$("0.00",CSng(.Text)),7) & vbTab

Both avoid the implicit string->number conversion and doing the same format
call twice.

field?  Maybe
Hmm! Funny syntax on your Format statements there Bob... did you
forget to drink your coffee this morning?<g>

Also, that first statement won't work (even after reversing the
arguments in the Format statement); multiple # signs do not hold
multiple places. Since you have a zero in front of the decimal
point, the three # signs you show will not have any effect (leave
them off and you will get the same output). The second statement
you show will work fine though (after reversing the Format
function's arguments of course), although you omitted the
concatenation of sRiga onto the front of the statement. Lack of
coffee, right?

Another coding possibility is the following

sRiga = sRiga & Format$(Format$(3.3, "0.00"), "@@@@@@@") & vbTab

True, this uses the Format function twice, but each usage is
different.

Rick

"Rick Rothstein [MVP - Visual Basic]"
<rickNOSPAMnews@NOSPAMcomcast.net> wrote in message
<cut>
LOL
I don't drink coffee; perhaps I should start!

I thought I remembered the # as being leading 0 or space...  I don't
actually use the Format function very much so these little details tend to
escape the brain over time.

No, just didn't read the OP carefully enough

That doesn't bug me nearly as much as the code that did exactly the same
formatting twice.  I still prefer not using Format if I can do it another
way just as easily.  Not sure why I dislike it like I do but I do try to
avoid it.

....
[sic, modified to remove syntax error and leave only the format]

Which is why I've always thought Format$() either needed rules similar
to Fortran FORMAT statements or another placekeeper for precisely the
purpose Bob wanted # to serve.  Actually, I never understood why #
wasn't defined in that manner...

The 0 and # characters are place holders for numbers... the 0
forces a zero to be outputted if there is no digit in the
specified place and the # outputs the empty string ("") if no
digit exists. Now, on to your question. I'm afraid it isn't
entirely clear what you want in the general situation. For
example, can you have a number whose integer part is 2 or more
digits (such as 12.34)? If so, what did you want to output for
this situation? In other words, are you always looking to output a
leading blank space? Or are your numbers confined to a maximum of
two digits in the integer part and you want the blank space only
when a single digit appears in the integer portion of the number?
Or something else I haven't thought of? Also, what did you want
outputted if the number has no integer portion (such as .456)... a
leading blank followed by a zero or just two leading blanks?

Rick

excel versions in Vb 6
Application error "Permission Denied" only under WinXP-SP2
Is there a more elegant way to do this?
Update Workstations with new executable
Compile, Save, Exit, ReStart, big trouble
Problem connecting to remote MySQL DB from VB6
Dependency walker and custom ocx.
Lexical analysis
How many ORs can you have in ADODB
INTODUCTION TO VISUAL BASICS