自由,平等,開源,分享

            BlogJava :: 首頁 :: 聯系 :: 聚合  :: 管理
            2 Posts :: 61 Stories :: 3 Comments :: 0 Trackbacks

          留言簿(3)

          我參與的團隊

          搜索

          •  

          積分與排名

          • 積分 - 49558
          • 排名 - 999

          最新評論


          Public Function fnSize(vSize,iDot)
            
          Dim sSize:sSize="0"
            
          If vSize>1073741824 Then
              sSize
          =FormatNumber(vSize/1073741824,iDot,-1,0,0)&" GB"
            
          ElseIf vSize>1048576 Then
              sSize
          =FormatNumber(vSize/1048576,iDot,-1,0,0)&" MB"
            
          ElseIf vSize>1024 Then
              sSize
          =FormatNumber(vSize/1024,iDot,-1,0,0)&" KB"
            
          Else
              sSize
          =vSize&" Byte"
            
          End If
            fnSize
          =sSize
          End Function

          posted on 2008-05-09 01:34 龍震 閱讀(272) 評論(0)  編輯  收藏 所屬分類: 程序,代碼,語言
          主站蜘蛛池模板: 饶河县| 图片| 华宁县| 宝鸡市| 潼南县| 吉安县| 兴文县| 陇西县| 霞浦县| 中牟县| 延庆县| 马鞍山市| 陆河县| 崇仁县| 灵川县| 石棉县| 汨罗市| 孟津县| 庄河市| 和田市| 沙雅县| 古丈县| 盖州市| 桃园县| 江川县| 德化县| 大宁县| 瑞丽市| 伊川县| 昂仁县| 永定县| 共和县| 玉山县| 房山区| 济阳县| 灵宝市| 红河县| 尉犁县| 天镇县| 陵川县| 镶黄旗|