可以! 下面是一个获取硬盘号的程序: PUBLIC lpRootPathName, ; lpVolumeNameBuffer, ; nVolumeNameSize, ; lpVolumeSerialNumber, ; lpMaximumComponentLength, ; lpFileSystemFlags, ; lpFileSystemNameBuffer, ; nFileSystemNameSize lpRootPathName = "C:\" && Drive and directory path lpVolumeNameBuffer = space(256) && lpVolumeName return buffer nVolumeNameSize = 256 && Size of/lpVolumeNameBuffer lpVolumeSerialNumber = 0 && lpVolumeSerialNumber buffer lpMaximumComponentLength =256 lpFileSystemFlags = 0 lpFileSystemNameBuffer =space(256) nFileSystemNameSize = 256 DECLARE INTEGER GetVolumeInformation IN Win32API AS GetVolInfo ; STRING @lpRootPathName, ; STRING @lpVolumeNameBuffer, ; INTEGER nVolumeNameSize, ; INTEGER @lpVolumeSerialNumber, ; INTEGER @lpMaximumComponentLength, ; INTEGER @lpFileSystemFlags, ; STRING @lpFileSystemNameBuffer, ; INTEGER nFileSystemNameSize retval=getvolinfo(@lpRootPathName, @lpVolumeNameBuffer, ; nVolumeNameSize, @lpVolumeSerialNumber, ; @lpMaximumComponentLength, @lpFileSystemFlags, ; @lpFileSystemNameBuffer, nFileSystemNameSize) ?? '你的硬盘号:'+STR(lpVolumeSerialNumber)