‘FuangKuai(FuangKuai.bas)
Option Explicit
Public Type FangKuai
Info(1 To 4, 1 To 4) As Integer '存储每个方块的信息,用4*4的格子表示方块
PicType As Integer '方块的图型,有效值1 到4
End Type
Public FKArray(1 To 6, 1 To 4) As FangKuai
Public ImageFKArray(12 * 19) As Integer '当前方块
Public BackImageFKArray(12 * 19) As Integer '备份方块