您的位置：首页 > 编程语言 > VB

vb.net FormatNumber用法

2011-08-25 16:21 656 查看
TitleUsetheFormatNumberfunctioninVisualBasic.NET
DescriptionThisexampleshowshowtousetheFormatNumberfunctioninVisualBasic.NET.
KeywordsFormatNumber,formatnumber,VB.NET
CategoriesStrings,VB.NET
TheFormatNumberfunctionreturnsaformattedstringrepresentationforanumber.Thesyntaxis:

FormatNumber(expression_
[,digits_after_decimal]_
[,include_leading_zero]_
[,use_parens_if_negative]_
[,groups_digits])


Where:

expressionThenumericexpressiontoformat

digits_after_decimalThenumberofdigitstodisplayafterthedecimalpoint

include_leading_zeroIfthenumberislessthan1andgreaterthan-1,determineswhetherthenumbershouldhavealeading0beforethedecimalpoint.

use_parens_if_negativeDetermineswhethernegativenumbersaresurroundedwithparenthesesinsteadofusingaminussign.

groups_digitsDetermineswhetherdigitstotheleftofthedecimalpointaregroupedwiththousandsseparators(commasintheUnitedStates).

Examples:

ExpressionResult
FormatNumber(1.23456,2)1.23
FormatNumber(0.123456,2,TriState.False).12
FormatNumber(0.123456,2,TriState.True)0.12
FormatNumber(-12345.12,,TriState.False)-12,345.12
FormatNumber(-12345.12,,TriState.True)(12,345.12)
FormatNumber(-12345.12,,TriState.True,TriState.False)(12345.12)
ThisexampleusesthefollowingcodetodisplaytheseexamplesinaTextBox.


PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByVal_
eAsSystem.EventArgs)HandlesMyBase.Load
DimtxtAsString
DimxAsSingle

x=1.23456
txt&="FormatNumber("&x.ToString()&",2)="&_
FormatNumber(x,2)&vbCrLf
x=0.123456
txt&="FormatNumber("&x.ToString()&",2,"&_
"TriState.False)="&FormatNumber(x,2,_
TriState.False)&vbCrLf
txt&="FormatNumber("&x.ToString()&",2,"&_
"TriState.True)="&FormatNumber(x,2,_
TriState.True)&vbCrLf
x=-12345.12345
txt&="FormatNumber("&x.ToString()&",,"&_
"TriState.False)="&FormatNumber(x,2,,_
TriState.False)&vbCrLf
txt&="FormatNumber("&x.ToString()&",,"&_
"TriState.True)="&FormatNumber(x,2,,_
TriState.True)&vbCrLf
txt&="FormatNumber("&x.ToString()&",,"&_
"TriState.True,TriState.False)="&_
FormatNumber(x,2,,TriState.True,TriState.False)_
&vbCrLf

txtResult.Text=txt
txtResult.Select(0,0)
EndSub


                                            

                                        

                        
                        内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 点击这里给我发消息 
                    

                    

                    

                        

                         标签： 
                                                

                        

                    


                

            


            

                
相关文章推荐

                

                
            

        

        

            

            
            

                

                    
新的分享

                    

                        
                    

                

            


            

                

                    
章节导航