Urgency VB does not display zero when it displays pure decimals, how to solve it? 10

I understand that your problem is not entered in the text control".123213", how to display as""

It is recommended to set a double precision variable, give the value to the double variable first, and then format the variable.

Here's an example: (There are cmdcommand1 and txttext1 controls in the form) private sub cmdcommand1 click()dim d as double

d = val(

msgbox format(d, "###########end sub

Through the test (vb6+sp6), you can meet your requirements. Of course, this example is not perfect, and if there are more decimal places than the number of digits, it will be rounded.

Because you've converted it to a string.

This has to do with the conversion mechanism of VB.

Both positive and negative remove the zero before the decimal point.

I can't help it, so let's add it myself after conversion.

dim i as single

dim istr as string

if i > 0 and i < 1 thenistr = format(i, ""The number of 0 is the number of decimal places.

print istr

elseistr = cstr(i)

print istr

end if

Just do it in a similar way.

For example: x1 = h + sqr(z)) 2 * g)x2 = h - sqr(z)) 2 * g)= x1=" x1

x2=" x2

It can be changed to: x1 = h + sqr(z)) 2 * g)x2 = h - sqr(z)) 2 * g)if x1>0 and x1<1 then= x1=" format(x1,"")

x1=" x1

end if

if x2>0 and x2<1 then= x2=" format(x2,"")

x2=" x2

end if

You can also use format(x1,"0.####"), the last 0 is removed.

The methods are all similar.

It doesn't matter, it's caused by the settings of Windows. It's useless to have any information.

Start - Control Panel - Region & Language Options.

Custom - Zero Start Display Handle7 Change to just fine.

There are two ways to make the display.

One: digging shouts with a judgment to sell wild format(). Specific usage:

r=print format(r,"0.Two: dim a, b, c as longc = a * b

if a * b < 0 then

c = imitation 0" &a * b

end if

You're right...

This is the unspoken rule of VB. Clan void.

You can use this missing answer method to try y=format(a Fu Sui Hui B,"")

1) Use the format function format to display decimals.

format function, which returns a variant (string), which contains an expression that is formatted according to the instructions in the format expression.

private sub form_click()format(4 / 10, "")

format(1 / 7, "0.######")end sub

2) Start Menu - Control Panel - Time, Language & Region - Change Date, Time or Number Format - Other Settings - Zero Start Display - Select.

Do you ask him to show it or not?

Display: print format(1 3,"") or print format(1 3,"0.####

Don't show: print format(1 3,".0000") or print round(1, 3,4).

It must not be displayed, and the format command should be used.

In"Control Panel"down"Clock, language and region"of"Region and language"Selected"Time or number format"Medium adjustments.

Or change:

private sub command1_click()print format(, "0.#######text1 = format(, "0.#######end sub

VB does not display 0 before the decimal point by default when displaying pure decimal places, if you must display 0 before the decimal point, use VB's formatting function: A

format(a,"")

Then the text box will read: