如果一个变量只有几种可能的值,则该变量可以定义为枚举类型:
Enum Element '定义枚举类型, 小方块所有的可能的种类
wall, target, box, empty, achieved, role
End Enum
Dim level(7, 7) As Long = {{wall, wall, wall, wall, wall, wall, wall, wall}, _
{wall, wall, wall, target, box, empty, empty, wall}, _
{wall, empty, empty, empty, empty, empty, empty, wall}, _
{wall, empty, empty, empty, empty, empty, empty, wall}, _
{wall, empty, empty, empty, empty, empty, empty, wall}, _
{wall, role, empty, box, target, wall, wall, wall}, _
{wall, empty, empty, empty, empty, wall, wall, wall}, _
{wall, wall, wall, wall, wall, wall, wall, wall}}
其中,enum为定义枚举类型的关键词,Element为用户定义的枚举类型的名称,{}内列出了所有可能的取值。
也可以直接定义枚举类型二维数组level,存储所有的地图数据。将level由字符型调整为枚举类型,这样程序的可读性更好,也可以避免赋值不当造成的问题。
评论一下?