VisualBasic程序设计题目:五子棋(自拟)学生姓名:学生班级:指导教师:朱辉提交日期:1.五子棋介绍(四号字,宋体,加粗)(小四字,宋体)五子棋是一种两人对弈的纯策略型棋类游戏,棋具与围棋通用,是起源于中国古代的传统黑白棋种之一。发展于日本,流行于欧美。容易上手,老少皆宜,而且趣味横生,引人入胜;不仅能增强思维能力,提高智力,而且富含哲理,有助于修身养性。已在各个游戏平台有应用。传统五子棋的棋具与围棋大致相同,棋子分为黑白两色,棋盘为15×15,棋子放置于棋盘线交叉点上。两人对局,各执一色,轮流下一子,先将横、竖或斜线的5个或5个以上同色棋子连成不间断的一排者为胜。2.程序界面图1五子棋主界面控件说明:标签Label1:显示“当前下棋方”lblName(0):显示“黑方”lblName(1):显示“白方”lblPrompt1:显示黑方“胜0盘,负0盘”lblPrompt2:显示白方“胜0盘,负0盘”图片:ImgNow:当前下棋方棋子图片Img(0):黑方棋子图片Img(1):白方棋子图片Menu:菜单PictureBox:绘制棋盘3.程序设计3.1变量说明DimMapBlack(1To19,1To19,0To4)AsSingle黑方棋盘权值表DimMapWhite(1To19,1To19,0To4)AsSingle白方棋盘权值表DimNowOptAsBoolean当前下棋方DimCanOptAsBoolean是否可运行DimBlackWinAsInteger黑方胜数DimBlackLostAsInteger黑方失败数DimWhiteWinAsInteger白方胜数DimWhiteLostAsInteger白方失败数ConstGrid=240单元格点尺寸3.2过程说明InitializePre()为每个棋位赋权值ShowMap(OptAsBoolean,XAsInteger,YAsInteger,OptionalCNAsBoolean=False)画棋子ReDrawMap()重新绘制棋盘ReInputData()清除棋位的权值Form_Load()加载应用PicMap_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)落子3.3函数说明InputeCalcPre()计算四向棋位权值OpinionWin(OptAsBoolean)胜负判定ReadMapData()画出落子4.源码说明每个棋位取值初始化PrivateSubInitializePre()'初始化优先级DimiAsInteger,jAsIntegerFori=1To9Forj=iTo19-iMapBlack(i,j,1)=i//权值以中心为基础逐次向外减少MapBlack(i,j,2)=iMapBlack(i,j,3)=iMapBlack(i,j,4)=iMapBlack(j,i,1)=iMapBlack(j,i,2)=iMapBlack(j,i,3)=iMapBlack(j,i,4)=iNextjNextiFori=19To11Step-1Forj=20-iToiMapBlack(i,j,1)=20-iMapBlack(i,j,2)=20-iMapBlack(i,j,3)=20-iMapBlack(i,j,4)=20-iMapBlack(j,i,1)=20-iMapBlack(j,i,2)=20-iMapBlack(j,i,3)=20-iMapBlack(j,i,4)=20-iNextjNextiMapBlack(10,10,1)=10//中间的棋位权值MapBlack(10,10,2)=10MapBlack(10,10,3)=10MapBlack(10,10,4)=10Fori=1To19//设定白棋的初始权值与黑棋相同Forj=1To19MapWhite(i,j,1)=MapBlack(i,j,1)MapWhite(i,j,2)=MapBlack(i,j,2)MapWhite(i,j,3)=MapBlack(i,j,3)MapWhite(i,j,4)=MapBlack(i,j,4)NextjNextiEndSub依次说明所有的函数和过程5.对于该选题日后改进的设想该程序实现了五子棋人机对抗,利用给棋位赋权值的方法,实现了简单的职能算法。缺点是:不能记录下棋步骤,不能实现人人对抗,未支持网络功能。报告页数在15页之内,第15周周末前,提交到2号实验楼410,网络工程系,朱辉收。打印A4,报告、源程序压缩保存文件,班级JK1101001姓名.zipzhui@xupt.edu.cn如何截图当在实验报告中需要引用“运行结果截图”时,需要通过WINDOWS系统所提供的“画图”软件简单的图像编辑。该软件的快速引用方式为“开始-所有程序-附件-画图”。截图过程可参考以下步骤:1)首先打开WINDOWSOFFICE文档编辑工具。2)运行所需要截图的程序,并得到结果,该结果可以是程序编译时给出的错误提示信心、程序运行结果等,如:或者3)当在屏幕上出现所需要的图时,按下键盘的“打印屏幕键”。一般该键位于键盘的右上角,通常该键上显示的字母为“PrtScSysRq”或者“PrintScreenSysRq”等类似信息。此时,该屏幕就被保存在计算机内存中。4)打开WINDOWS所提供的画图软件,新创建一个空白的画板。然后将复制在内存的屏幕图像粘贴在这个空白画板上。可以通过快捷按键“Ctrl+V”或者是画图软件中所提供的“粘帖”菜单。5)在画板中只截取需要的部分,如只截图红色矩形框部分再次使用快捷按键“Ctrl+C”复制,最后粘贴到WINDOWSOFFICE中所编辑的实验报告相应的位置中。