高手试试做华容道游戏

hxhgxy · 发表于 2003-5-28 22:42

PUvsyQrz.rar (8.96 KB, 下载次数: 94) 这是J-WALK做的一个绘图游戏。我觉得可以借鉴这个思路做个简易的华容道游戏。有大师愿意一试的吗？

hxhgxy · 发表于 2003-6-1 20:36

YccI5uuz.rar (7.49 KB, 下载次数: 39) 我做了一个简陋的，有几个问题请教： 1.如何控制图块不走出城墙？ 2.如何控制图块不能重合，即在你要走的图块前方有图块时就不能再向前？ 3.如何定位每一个图块，每个图块都有名称。这个问题的目的是RESET游戏。 4.如何在曹操（大方块）走出城墙的时候弹出信息？ 5....

hxhgxy · 发表于 2003-6-3 12:58

vdDCyr7l.rar (13.25 KB, 下载次数: 45) 另一种思路。 Public currColor Dim oldCell As Range Sub auto_open() 'oldCell = ActiveCell currColor = ActiveCell.Interior.ColorIndex End Sub Sub top() Selection.Interior.ColorIndex = 15 With Selection .MergeCells = False End With ActiveCell.Offset(-1, 0).Select With Selection .MergeCells = False End With Selection.Merge Selection.Interior.ColorIndex = currColor End Sub 1.我想定义OLDCELL，目的是选中一个单元格 - 移动后，选中的还一个；选中多个单元格 - 移动后仍然是多个单元格。 2.定义CURRCOLOR，选中红色的单元格，移到新单元格后变为红色，选什么色就变什么色。为什么我的程序会将CURRCOLOR固定为白色？ 3.如何判断活动单元格四周单元格的底色？

		自动登录	找回密码
密码			免费注册