vb.net - 将 KB 转换为 MB？

Question

请参阅此帖子的底部以获取有关此信息的更新。

我有以下代码搜索目录并显示目录中的最大文件。问题是它以 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.....除非我已经拥有 STRMAX 变量.....仍然是一个初学者伙计们。

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

Answer 1

(抱歉之前的答案是 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)