硬盤分區整數大小計算工具以前寫過用批處理實現,這次改用了vbs,腳本的主要功能是實現硬盤分區的整數大小的計算,程序中自動計算FAT32和NTFS分區所需的大小值,具體見程序:

On Error Resume next
'計算FAT32
Function calFat32(fsize)
????????calFat32=(fsize-1)*4+1024*fsize
End Function
'計算NTFS
Function calNtfs(nsize)
????????Dim cylinderSize
????????cylinderSize=512*255*63/1024/1024
????????cylinderNum=RoundUp(nsize*1024/cylinderSize)
????????calNtfs=RoundUp(cylinderNum*cylinderSize)
End Function
'向上取整函數
Function RoundUp(num)
????????RoundUp=Fix(num)+1
End Function
Dim size
'輸入過程
Sub Input()
????????size=InputBox("輸入你欲分出的整數值,單位GB:","整數分區計算器",25)
End Sub
Call Input()
Do While(size<>"")
????????sReturn=InputBox("計算結果如下,如要再次計算請點擊確定,否則取消退出","整數分區計算器","FAT32:"&calFat32(size)&"MB,NTFS:"&calNtfs(size)&"MB")
????????If sreturn<>"" Then
????????????????Call Input()
????????Else
????????????????Exit do
????????End If
loop

運行效果如下:

轉載于:https://www.cnblogs.com/crid/archive/2010/11/28/5172716.html

總結

以上是生活随笔為你收集整理的整数分区计算器的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。