如何用VB计算可用磁盘空间?
发布网友
发布时间:2023-06-23 11:16
我来回答
共1个回答
热心网友
时间:2023-10-09 21:01
高级代码!
至宝
'引用
Microsoft
Scripting
Runtime
Dim
fso
As
New
FileSystemObject,
drv
As
Drive
Set
drv
=
fso.GetDrive(fso.GetDriveName("c:"))
Print
"剩余空间大小:"
&
drv.FreeSpace
/
1024
/
1024
Print
"磁盘大小:"
&
drv.TotalSize
/
1024
/
1024