2017激战2职业最强:编程问题!

来源:百度文库 编辑:高校问答 时间:2024/05/07 09:43:26
请问在VB种怎样查看硬盘的空间??
可不可以不用API函数?偶不喜欢API函数诶,所以没怎么学。。。。。。。。。。。。

我给你来点仔细的吧:
可以使用GetDiskFreeSpace函数来检查在磁盘上有多少空间:
Private Declare Function GetDiskFreeSpace Lib "kernel32" Alias "GetDiskFreeSpaceA" (ByVal lpRootPathName As String,lpSectorsPerCluster As Long,lpBytesPerSector As Long,lpNumberOfFreeClusters As Long,lpTotalNumberOfClusters As Long) As Long
参数含义:
lpRootPathName要检查的磁盘(如“C:\”)
lpSectorsPerCluster磁盘上每一簇的扇区数量
lpBytesPerSector每一扇区的字节数量
lpNumberOfFreeClusters剩余簇的数量
lpTotalNumberOfClusters所有簇的总共数量
总共的剩余空间可以这样计算:
"SectorsPerCluster*BytesPerSector*NumberOfFreeClusters"
驱动器的磁盘空间总数计算:
"SectorsPerCluster*BytesPerSector*TotalNumberOfClusters"
即扇区/簇*比特/扇区*所有簇的总数
自己对照着做吧,例子就不写了,比较麻烦。

需要调用API函数了,具体的,你可以去网上查一下很多的,