俄罗斯方块--vb6实现[27]

[入库:2006年2月23日] [更新:2007年3月24日]

本文简介:

        Next n

         

         '没到最底行,但是不下面有方块了,不能再下移了

        For m = 1 To 18

            For n = 1 To 12

               

                 tem2 = m * 12 + n

                 tem = (m - 1) * 12 + n

                  If ImageFKArray(tem) = 1 And ImageBackFKArray(tem2) = 1 Then

                     test = 0

                     GoTo goback

                 End If

            Next n

        Next m

本文关键:俄罗斯方块--vb6实现
  相关方案
Google
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top