用VB6.0编写中国象棋游戏,需要什么控件?棋谱的代码怎么写?

如题所述

picture数组
可以用坐标来完成
用数组来记录坐标
棋谱代码 我想是靠自己写吧
比如
Private Sub Form_Load()
Picture1(1).Picture = LoadPicture("") '这图是兵
End Sub

Private Sub Picture1_Click(Index As Integer)
If Index = 1 Then
If Picture1(1).Top >= 1000 Then '没过河
Picture1(1).Left = 500 '保持不变 意思就是不能左右移动,当用鼠标指定他的位子就可以上前一步
ElseIf Picture1(1).Top <= 700 Then '已经过河
'可以就解除限制
End If
End If
End Sub
'还要判断你指定位子的坐标,是否远远超过一步距离,或远远小于一步距离
'可以用所画的线来判断位子
实际代码不是这样写的
只是希望你明白这个道理
温馨提示:答案为网友推荐,仅供参考
第1个回答  2017-07-15
汧 沪 蹴 送 菜 鑫
洄  水  稿 大   ろ%
gdy.baidu/www.i-k9.com?zcad
-------------------
用在铣床上加工齿轮,采用的是仿形法加工,
(2)一个齿一个齿加工轮齿。
(3)平面在平面磨床上磨削,外圆在外圆磨床或者万能磨床上磨削。
(4)这两种磨削都比较容易。内孔在内圆磨床或者万能磨床上磨削。
(5)磨内孔因为不好观察,排屑润滑不好,加工比外圆与平面难。
相似回答