甜橘子，专注成都网站制作网站设计与营销型网站建设与优化
QQ :532337155
电话：028-86922220
中国象棋小游戏。
创新互联建站坚持“要么做到，要么别承诺”的工作理念，服务领域包括：成都网站设计、成都网站制作、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的金沙网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！
国际象棋游戏。
都是VB的代码，自己下吧。
记得以前上学的时候做过的，个人推荐：
先用线条画出棋盘，然后在棋盘的90的点都画好棋子（可以用image控件画圆，lable控件显示棋子内容），并编成10*9的二维数组，利用控件image的visible属性控制是否显示，控件lable控制显示的内容。
个人认为这个应该比利用坐标让控件移动的方法简单
中国象棋类:
中国象棋程序Coony V1.5
ElephantBoard(象堡)和浅红象棋引擎，可能是免费象棋软件中水平最高的程序。
象棋世家 V5 Build 91046
棋力超强饶有趣味的象棋软件，获得2005年世界象棋软件奥林匹克比赛银牌。独有的人机擂台赛功能，迅速提高您的棋艺，是象棋爱好者的良师益友。
当前版本在2005世界奥林匹克象棋软件大赛银牌版基础上加以改进，总体棋力又有相当的提高。
适用于各种高低档配置的电脑
界面采用Office2003风格，同时对窗口布局进行了优化，美观实用，同时不会占用大量系统资源。
支持国内外比赛的各种时限设置，如联众，中游，QQ，弈天上的包干加秒制、分段时限制、以及步时步层控制等方式。
设置向导一步步引导您进行界面和引擎的设置，软件设置变得非常轻松。
状态栏信息更丰富，控制更容易
向计算机挑战，通过打擂台的方式，自动升降关，您总是能挑战适合自己水平的电脑智能，同时，每前进一大关，对手的头像会发现变化，这使趣味性大大增强，可以在轻松游戏中潜移默化地提高自己的棋力，软件真正成为了自己提高棋艺，学习象棋的好伙伴。一共分为五大关，每大关分三小关，连胜2局则升到高一关，连负2局则降到低一关，难度由低到高，平滑递进。
我们的目标是做最受欢迎的象棋软件，不管您是叱咤风云的当地象棋高手，还是喜欢与电脑对砍的象棋爱好者，还是希望提高棋艺的象棋爱好者，您都会发现象棋世家V5是您最佳的好工具，好帮手，好伙伴。
中国象棋大战 V2.05
本软件可以进行中国象棋人机对弈和双人对弈，电脑分4个级别，可以保存对弈棋谱。界面友好，操作简单，无需安装，复制到计算机内即可运行。
天狼中国象棋 V1.25
原名中国象棋2001。该软件可进行网络对战(局域网和Internet)、人机对战和同机对战，具有让子、悔棋、保存对局、续盘、摆局、和棋、认输、交换棋子、第三者旁观、聊天、声音、走棋轨迹显示、闪烁提示和GB-BIG5字体支持等功能！而且，还专门开辟了一个"研究室"，里面有系统自带的近1000多个精典棋谱，包括：《橘中秘(上)》，《橘中秘(下)》，《残局攻杀大全》，《梅花泉》，《现代布局精要》，《中国象棋基本杀法》，《中国象棋基本战术》和《中局杀法》等九本秘籍；并且你可以"自己走试试"，其定会对你棋艺的提高大有裨益！1.21版更正了1.20版在研究室研究棋谱时的错误。
帝诺中国象棋段位赛 V3.0
本软件设计新颖、算法准确，是象棋爱好者不可多得的“宝物”。中国象棋是一种传统的竞赛项目。千百年的象棋竞技，演化出许多经典的对局。帝诺（中国）象棋段位赛，允许用户任意选择比赛对手和比赛类型，通过计算机科学评测的方式，供象棋学习者研究练习。
丁丁中国象棋 V1.3
非常有趣味的人机对战象棋软件，无聊时与电脑下下棋也很不错。绿色软件(只有一个文件)，下载后直接运行。棋力一般但棋风飘忽，如果你不小心便可能输给它。
国际象棋类:
国际象棋大师第10版
对于绝对的狂热国际象棋爱好者来说，这款最新的《国际象棋大师》算不上一款完美的程序。然而，如果你正在寻找一款有过多特色和所有高级特性的优秀国际象棋程序，那么，《国际象棋大师第10版》将是你最佳的选择。
国际象棋
战斗国际象棋4000
Interplay 于92年推出的国际象棋游戏，和普通棋类游戏不同，这里所有的吃子动作都被配以华丽的CG片段。因此如果你喜欢下棋，一定要试试它。
国际象棋大战 V1.06
国际象棋人机对弈软件。棋子制做精美，界面逼真，是学习国际象棋的好工具。
卡斯帕罗夫国际象棋大师
采用世界顶尖智能引擎的国际象棋大师级游戏，特别聘请国际象棋世界冠军Garry Kasparov 卡斯帕罗夫为您指点棋艺，不论是初学还是职业高手，都能在这里找到你的乐趣
！
风云谷国际象棋大师 V2.1 免费版
是否想迅速提高自己的棋弈,您是否正在寻找一位适合自己的对手,您是否想与大师过过招,《风云谷国际象棋大师》能完全满足您的需求！他丰富的级别,根据您的水平让您可以轻易找到适合您的级别！他比同类软件的水平明显要高出很多，让您体验与高水平对手对弈的快感！如果您是一位正在学棋中的棋手，他可以成为您的绝佳陪练，如果您是一位国际象棋爱好者，他可以成为您的知心棋友！更重要的一点是，本软件完全免费。您还在犹豫什么，还不快把“大师”请回家？
国际象棋游戏(Mine) V0.99
是一个国际象棋游戏，可以两人对弈和人机对弈，水平不高，主要是希望能和大家多交流，共同进步！
你是要交作业吗？是要原创的吗？网上的可能很多人都有，但我自己写的还没有发表，哈哈。这里贴不了全的，我可以写一段给你看看，你觉得可以，就找我要吧，完全free的，能帮到你最好。
贴保存棋局和读取棋局部分的，你先看看：
Rem 读取棋局
Private Sub mnuRead_Click()
Dim s As String, i As Integer, t
If Dir(App.Path "\cchess.che") = "" Then MsgBox "没有棋局文件可以读入！请先保存棋局！", , "中国象棋": Exit Sub
Open App.Path "\cchess.che" For Input As #1
Input #1, s
Close #1
s = Replace(s, vbCrLf, "")
s = Trim(s)
t = Split(s, " ")
If UBound(t) 89 Then MsgBox "棋局文件已遭到破坏！请重新保存棋局！", , "中国象棋": Exit Sub
For i = 0 To 89
a(i) = Val(t(i))
Next
MsgBox "棋局文件已成功读入！", , "中国象棋"
End Sub
Rem 保存棋局
Private Sub mnuSave_Click()
Dim s As String, i As Integer
s = ""
For i = 0 To 89
s = s " " a(i)
Next
s = Trim(s)
Open App.Path "\cchess.che" For Output As #1
Print #1, s;
Close #1
MsgBox "当前棋局已成功保存！", , "中国象棋"
End Sub