用VB6.0写中国象棋游戏需要哪些控件?象棋手册的代码怎么写?

图像阵列

可以在坐标中完成。

使用数组记录坐标

我想是我自己写的象棋代码。

例如

私有子窗体_Load()

图片1 (1)。picture = loadpicture(" ")这张图是军人。

末端接头

私有子图片1_Click(索引为整数)

如果索引= 1,则

If Picture1(1)。Top & gt= 1000然后‘不要过河

图片1 (1)。'左= 500 '不变,表示不能左右移动。当你用鼠标指定他的座位时,你可以向前走。

ElseIf Picture1(1)。Top & lt= 700那么‘已经过河了。

你可以取消限制。

如果…就会结束

如果…就会结束

末端接头

还要判断你指定的座位坐标是远不止一步的距离还是远不止一步的距离。

可以用画出来的线来判断座位。

实际代码不是这样写的。

我只希望你明白这个道理。