record_type.bas

来自「this game is programmed by visual basic 」· BAS 代码 · 共 12 行

Attribute VB_Name = "record_type"
'方块布局记录集与records.cls类模块相连
Type record
value As Integer '布局记录的值
color_type As Integer '颜色类型
End Type
'产生方块类型，颜色类型与downmove.cls类模块相连
Type mdltype
module_type As Integer '方块类型
color_type As Integer '颜色类型
End Type