如何知道硬盘是使用那一种文件系統（FAT32，FAT16）

　　現在硬盘越来越好，硬盘容量越来越大，很多人的硬盘都采用 FAT32 的文件系統，当然还有人采用 FAT16，而 NT 则可能为 NTFS，在 VB 中我们也可以判断出来！

'在表单的声明区区中加入以下的声明及模块：

** Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" _
(ByVal lpRootPathName As String, ByVal _
lpVolumeNameBuffer As String, ByVal _
nVolumeNameSize As Long, _
lpVolumeSerialNumber As Long, _
lpMaximumComponentLength As Long, _
lpFileSystemFlags As Long, ByVal _
lpFileSystemNameBuffer As String, ByVal _
nFileSystemNameSize As Long) As Long

Public Function WhichFileSystem(ByVal Drive As String) As String
Dim sVolBuf As String * 255
Dim sSysName As String * 255
Dim lSerialNum As Long
Dim lSysFlags As Long
Dim lComponentLength As Long
Dim lRes As Long
lRes = GetVolumeInformation(Drive, sVolBuf, 255, lSerialNum, _
lComponentLength, lSysFlags, sSysName, 255)
If lRes Then
WhichFileSystem = Left$(sSysName, InStr(sSysName, Chr$(0)) - 1)
Else
WhichFileSystem = ""
End If
End Function
'在程序中要使用时，只需输入硬盘代号即可，如下：

Msgbox WhichFileSystem("C:\")

注意：

在 NT 上的光碟机 J:\，由于已经 Map 成网络硬盘，所以检测結果为 FAT 而不是 CDFS！