如何在vba中使用枚举？

在vba中也可以使用枚举定义系列常量。

它的语法如下：

[Public | Private] Enum name
membername [= constantexpression]
membername [= constantexpression]
. . .
End Enum

例如以下是定义一个扇区号码类型的枚举：

Public Enum SectorName
 '最大的正常扇区号码(-6)
 MAXREGSECT = &HFFFFFFFA
 'DIFSECT的扇区号码(-4)
 DIFSECT = &HFFFFFFFC
 'FATSECT的扇区号码(-3)
 FATSECT = &HFFFFFFFD
 '扇区链的结束标志(-2)
 ENDOFCHAIN = &HFFFFFFFE
 'FAT、Mini FAT、DIFAT中没有分配的扇区(-1)
 FREESECT = &HFFFFFFFF
End Enum