バイトをGBにするには？

質問

Sub FSO()
Dim myFSO As Scripting.FileSystemObject
Set myFSO = New Scripting.FileSystemObject

Debug.Print myFSO.Drives.Item("C").TotalSize & "バイト"
End Sub

でバイトで容量を取得できるのですが、
単位をＧＢにするにはどうすればいいですか？

Debug.Print myFSO.Drives.Item("C").TotalSize / 1024000000 & "GB"
これであってるのでしょうか？

回答No.2

lupin-333333 · ベストアンサー

＞１０００＊１０００＊１０００でＧとするか、１０２４＊１０２４＊１０２４でＧとするかのどちらかです

当然ですよね。もともとの意味がわかっていれば、そうなるはずなんですが。

お礼

どうもありがとうございました。

回答No.1

mitoneko

慣習と、規約が入り交じり、とてもややこしい状態になっているのが、この２進数の補助単位の扱いです。
　本来、Ｋ・Ｍ・Ｇ・Ｔという補助単位は１０進数を基本としているので、素直に、１０００倍づつしていくのが正しい姿です。
　でも、２進数を扱う「バイト」にこれを適用する時に、２の１０乗の１０２４を掛けていく慣習がありました。この場合は、補助単位が一つ上がる毎に、１０２４倍することになります。１ＧＢだと、1024*1024*1024バイトです。

　ただしい、単位として、１０２４倍を基礎とする単位系には、「キビバイト」（ＫｉＢ）・「メビバイト」（ＭｉＢ）・「ギビバイト」（ＧｉＢ）とするＩＥＣの規定もあるのですが、あまり知られてはいません。

　そのため、Ｋ・Ｍ・Ｇ・Ｔを１０００倍としてみるか１０２４倍としてみるかは、渾然として入り交じっているのが実情です。

　ただ、乗率を１０２４にするのか、１０００にするのかはどちらか一つに統一してください。１０２４＊１０００＊１０００というのはあり得ません。１０００＊１０００＊１０００でＧとするか、１０２４＊１０２４＊１０２４でＧとするかのどちらかです。（実は、こういう単位系が混乱した使い方をしている事例も多いです。が、明らかにおかしいです。）
　どちらを選択するかは、あなたが作っておられるソフトを使う人・環境が、どちらの単位系を使っているかを見て決めてください。

お礼

どうもありがとうございました。