vb.net – 将KB转换为MB？

请查看此帖的底部,以便更新.

我有以下代码搜索目录并显示目录中的最大文件.问题是它以KB格式显示 – 我究竟如何将其转换为MB？文件大小太大,所以想要更容易阅读 – 感谢您的帮助：

Private Sub btnGetMax_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles btnGetMax.Click
    ClearList()

    Dim dblSize As Integer = 0
    Dim dblMax As Integer = 0
    Dim strMax As String = ""

    Dim objFileInfo As System.IO.FileInfo

    For Each strFile As String In My.Computer.FileSystem.GetFiles("c:\temp",FileIO.SearchOption.SearchAllSubDirectories)

        objFileInfo = My.Computer.FileSystem.GetFileInfo(strFile)
        /*whats the size of the files?*/
        dblSize = objFileInfo.Length

        If dblSize > dblMax Then
            dblMax = dblSize
            strMax = objFileInfo.FullName
        End If
    Next

    MessageBox.Show("Largest file in .Net folder is " & vbCrLf &
                    strMax & vbCrLf &
                    dblMax.ToString("N0"))
End Sub

应该让我自己更清楚！我知道如何将KB转换为MB但不知道我如何将其纳入我的代码 – 我是否为STRMAX添加了另一个变量/1024..EXCEPT我已经有了STRMAX VARIABLE ……仍然是一个非常多的初学者GUYS.

我知道如何将KB转换为MB – 问题是如何将其合并到我的代码中？我是否添加了另一个变量

解决方法

(抱歉,上一个回答是1024,错误的假设)

关于从kB转换为MB的问题,您可以通过SI标准来确定：

1 MB = 1000 kB

因此,除以1000.

对于不相信的,我鼓励你阅读this.

由于Microsoft Windows expresses等软件的存储量为1024字节的倍数,因此请将代码更改为：

dblMax = dblMax/(1024*1024)  

  MessageBox.Show("Largest file in .Net folder is " & vbCrLf &
  strMax & vbCrLf &
  dblMax.ToString("N0"))

(因为你正在打印dblMax&你的文件大小是以字节为单位,而不是kB)