Formatting Numbers with Decimal Places
 

Is it possible to format numbers that are displayed in a text box in such a
way that fractional values are displayed to 2 decimal places and whole
numbers are not displayed with any decimal point?

I have tried using the code:
Format (value here, "0.##")

This works okay and works nicely for the fractional values, but when whole
numbers enter the text box the decimal point is displayed without any
trailing values. For example, "4880." Instead, I would like "4880" to be
displayed.

Thanks in advance for any suggestions,

James

Formatting Numbers with Decimal Places
 

s = Format (value here, "0.##")
if right(s,1) = "." then
s = Replace(s,".","")
end if

--
Regards,
Tom Ogilvy



"James" wrote:

Is it possible to format numbers that are displayed in a text box in such a
way that fractional values are displayed to 2 decimal places and whole
numbers are not displayed with any decimal point?

I have tried using the code:
Format (value here, "0.##")

This works okay and works nicely for the fractional values, but when whole
numbers enter the text box the decimal point is displayed without any
trailing values. For example, "4880." Instead, I would like "4880" to be
displayed.

Thanks in advance for any suggestions,

James

Formatting Numbers with Decimal Places
 

Another way:

Dim myVal as double
Dim myFormat as string

myVal = 12.12

if int(myval) = myval then
myformat = "0"
else
myformat = "0.00"
end if

msgbox format(myval,myformat)

There's a difference between Tom's suggestion and this one.

What do you want to see with a value like 12.0003?


James wrote:

Is it possible to format numbers that are displayed in a text box in such a
way that fractional values are displayed to 2 decimal places and whole
numbers are not displayed with any decimal point?

I have tried using the code:
Format (value here, "0.##")

This works okay and works nicely for the fractional values, but when whole
numbers enter the text box the decimal point is displayed without any
trailing values. For example, "4880." Instead, I would like "4880" to be
displayed.

Thanks in advance for any suggestions,

James

--

Dave Peterson

Formatting Numbers with Decimal Places
 

What do you want to see with a value like 12.0000000000001?

--
Regards,
Tom Ogilvy


"Dave Peterson" wrote in message
...
Another way:

Dim myVal as double
Dim myFormat as string

myVal = 12.12

if int(myval) = myval then
myformat = "0"
else
myformat = "0.00"
end if

msgbox format(myval,myformat)

There's a difference between Tom's suggestion and this one.

What do you want to see with a value like 12.0003?


James wrote:

Is it possible to format numbers that are displayed in a text box in such
a
way that fractional values are displayed to 2 decimal places and whole
numbers are not displayed with any decimal point?

I have tried using the code:
Format (value here, "0.##")

This works okay and works nicely for the fractional values, but when
whole
numbers enter the text box the decimal point is displayed without any
trailing values. For example, "4880." Instead, I would like "4880" to be
displayed.

Thanks in advance for any suggestions,

James

--

Dave Peterson

Formatting Numbers with Decimal Places
 

Me?

I don't care.

But sometimes people want to see different things if the value isn't really a
counting number.

Or am I missing the real point?

Tom Ogilvy wrote:

What do you want to see with a value like 12.0000000000001?

--
Regards,
Tom Ogilvy

"Dave Peterson" wrote in message
...
Another way:

Dim myVal as double
Dim myFormat as string

myVal = 12.12

if int(myval) = myval then
myformat = "0"
else
myformat = "0.00"
end if

msgbox format(myval,myformat)

There's a difference between Tom's suggestion and this one.

What do you want to see with a value like 12.0003?


James wrote:

Is it possible to format numbers that are displayed in a text box in such
a
way that fractional values are displayed to 2 decimal places and whole
numbers are not displayed with any decimal point?

I have tried using the code:
Format (value here, "0.##")

This works okay and works nicely for the fractional values, but when
whole
numbers enter the text box the decimal point is displayed without any
trailing values. For example, "4880." Instead, I would like "4880" to be
displayed.

Thanks in advance for any suggestions,

James

--

Dave Peterson

--

Dave Peterson

Formatting Numbers with Decimal Places
 

Like your post,
Just added info for the OP.

--
Regards,
Tom Ogilvy


"Dave Peterson" wrote:

Me?

I don't care.

But sometimes people want to see different things if the value isn't really a
counting number.

Or am I missing the real point?

Tom Ogilvy wrote:

What do you want to see with a value like 12.0000000000001?

--
Regards,
Tom Ogilvy

"Dave Peterson" wrote in message
...
Another way:

Dim myVal as double
Dim myFormat as string

myVal = 12.12

if int(myval) = myval then
myformat = "0"
else
myformat = "0.00"
end if

msgbox format(myval,myformat)

There's a difference between Tom's suggestion and this one.

What do you want to see with a value like 12.0003?


James wrote:

Is it possible to format numbers that are displayed in a text box in such
a
way that fractional values are displayed to 2 decimal places and whole
numbers are not displayed with any decimal point?

I have tried using the code:
Format (value here, "0.##")

This works okay and works nicely for the fractional values, but when
whole
numbers enter the text box the decimal point is displayed without any
trailing values. For example, "4880." Instead, I would like "4880" to be
displayed.

Thanks in advance for any suggestions,

James

--

Dave Peterson

--

Dave Peterson

Formatting Numbers with Decimal Places
 

Ahhhh.



Tom Ogilvy wrote:

Like your post,
Just added info for the OP.

--
Regards,
Tom Ogilvy


"Dave Peterson" wrote:

Me?

I don't care.

But sometimes people want to see different things if the value isn't really a
counting number.

Or am I missing the real point?

Tom Ogilvy wrote:

What do you want to see with a value like 12.0000000000001?

--
Regards,
Tom Ogilvy

"Dave Peterson" wrote in message
...
Another way:

Dim myVal as double
Dim myFormat as string

myVal = 12.12

if int(myval) = myval then
myformat = "0"
else
myformat = "0.00"
end if

msgbox format(myval,myformat)

There's a difference between Tom's suggestion and this one.

What do you want to see with a value like 12.0003?


James wrote:

Is it possible to format numbers that are displayed in a text box in such
a
way that fractional values are displayed to 2 decimal places and whole
numbers are not displayed with any decimal point?

I have tried using the code:
Format (value here, "0.##")

This works okay and works nicely for the fractional values, but when
whole
numbers enter the text box the decimal point is displayed without any
trailing values. For example, "4880." Instead, I would like "4880" to be
displayed.

Thanks in advance for any suggestions,

James

--

Dave Peterson

--

Dave Peterson


--

Dave Peterson