取文件的大小代码,VB.Net代码库,德仔网

代码语言

代码分类

【VB.Net】取文件的大小

作者:步帝 / 发布于2015/3/24/ 937


	Public Function GetFileSize(ByVal iFileSizeKB As Long) As String
	 Dim iFileSizeMB As Integer
	 Dim iFileSizeGB As Integer

	 If (iFileSizeKB >= 1024) Then
	 iFileSizeMB = iFileSizeKB / 1024
	 If (iFileSizeMB >= 1024) Then
	 iFileSizeGB = iFileSizeMB / 1024
	 End If
	 End If

	 If (iFileSizeGB > 0) Then
	 Return iFileSizeGB.ToString() + " GB"
	 ElseIf (iFileSizeMB > 0) Then
	 Return iFileSizeMB.ToString() + " MB"
	 Else
	 Return iFileSizeKB.ToString() + " KB"
	 End If
	 End Function

	

	调用方式：
	 dim sFileFullName as String ="your file full name"
	 dim iFileSize as Integer = New System.IO.FileInfo(sFileFullName ).Length / 1024
	 dim sFileSize as String

	 sFileSize = GetFileSize(iFileSize)

评论列表

本站所提供的代码，版权归原作者所有，若有侵犯作者版权，请与我们联系，我们将立即删除或修改。谢谢!
本站所有代码发布及提供者。

试试其它关键字

　文件的大小　　文件大小　

同语言下

可能有用的

步帝贡献的其它代码(12)