教你用WPS表格制作象棋棋局
我用word做棋盘 word插入表格
我用Word做棋盘教学目标：知识与技能：1、认识用表格规划信息的必要性，能够根据需求制作简单的表格，掌握表格的基本修改技术。
2、学会制作表格、调整表格，合并单元格。
过程与方法：利用任务驱动法，演示法，小组合作法学会在word中绘制各种棋盘情感态度与价值观：通过小组合作，增加学生团体协作意识；通过对棋盘的绘制，让学生增加对各种棋类的了解教学重点：1、创建表格。
2、调整表格。
教学难点：调整表格，插入行、列。
教学方法：任务驱动、讲解示范、小组合作探究教学过程：一、情境导入师：老师这里有个字要考考大家。
幻灯片出示“弈”。
师：谁知道这个字念什么？生：yi （很少一部分学生回答）师：那你知道“弈”字是什么意思吗？（看学生反应，有没有能回答上来的）师：看来很少有同学知道它的意思，那么我们一起来看看“弈”字的含义。
幻灯片出示“弈”的意思。
师：弈字最早出现在春秋时期，后来古人下围棋称：对弈，一直延续到今天。
平时也有不少同学经常下棋，大家平时都玩什么棋？生：五子棋，围棋，象棋……师：大家真是多才多艺，会这么多种类的棋，我们下棋首先需要棋盘，今天我们就用word来绘制棋盘。
二、新授1、创建表格师：老师这里有三种大家常玩的棋。
首先，我们来看五子棋，你知道标准的五子棋的棋盘是几行几列吗？（出示五子棋棋盘）生：15行，15列。
师：那我们一起看看如何在word中插入表格吧。
首先，观察word 文档的菜单，有没有有关“表格”的菜单项？生：有。
师：那你看看“表格”菜单里有哪些子菜单？如何插入表格呢？学生尝试操作。
看有没有学生能做出来。
让做出来的学生上机演示。
2、调整表格师：表格成功的插入了，可是它和五子棋的棋盘还并不一样，这个单元格是长方形的，怎么把它拖动成正方形的呢？（可让学生上来尝试操作）学生上前演示操作。
3、认识表格师：表格插入完了，老师这里有个问题想要问问大家（幻灯片展示），你知道横着的红色箭头所指的部分叫什么吗？竖着的箭头所指的部分叫什么？一个格子叫什么？学生回答。
棋盘制作
内容：实例棋盘的制作
实例要点：
◆复杂表格的绘制
◆自选图形的绘制及格式设置
实例目的：
通过本例的教学，让学生掌握表格的综合应用：绘制斜线、边框与底纹的设置、自选图形的绘制及格式设置。
制作步骤：
1、表格的制作
步骤1 “表格”→“插入”→“表格”→插入9行8列表格。
步骤2全选→执行“表格”→“表格属性”→指定行高、列宽均为1.8cm。
步骤3 在九宫里画斜线:单击”绘制表格”按钮→顺次将各斜线画毕。
2、调整表格
步骤1 合并单元格：选中欲合并的单元格，单击“合并单元格”按钮，合并单元格。
步骤2 设置外框线：单击“表格与边框”工具栏之“线型”下拉框→选择“外粗内细”线型→单击“外部框线”按钮.
步骤3设置底纹：全选→单击“表格与边框”工具栏之“底纹颜色”下拉框→选择“浅黄”。
3、绘制棋子
步骤1单击“绘图”工具栏上的“椭圆”按钮,同时按住shift键，在编辑区绘制一个圆→复制五个圆→将填充颜色设为：“填充颜色”→“填充效果”→“纹理”设为“栎木”→线条颜色设置：红方设为红色，黑方设为黑色。
步骤2 右击各棋子→“添加文字”：帅、将，车、兵、卒，并转换为繁体→分别设置“字体颜色”为红色与黑色。
步骤3将各棋子的版式设置为“紧密型”→并拖至相应位置。
这样，一副精美的棋盘就算大功告成。
举一反三
本例通过绘制棋盘，将Word中的部分功能很好地综合运用起来。
实际上，生活中绝大多数的案例都可以用Word做出来。
实例效果（附后）。
我用word做棋盘
六、绘制表格
16
你知道吗？
棋艺活动是从中国古代流传下来的益智类游戏，它不 仅能够给丰富我们的课余生活，还能够锻炼我们的思维 能力。国际上更有各种棋类竞技比赛，各国高手切磋技 艺，一决高低。现在，我们能够用word快速的制作出各 类棋盘，下棋就更方便了。希望同学们课下可以多练习， 成为棋类小高手，说不定下个世界冠军就是你！
1
弈
本义：下棋，博弈 。万物皆有初，要说别名妙语也就从 最早的说起，围棋的最早别称为“弈”。
2
我用word做棋盘
3
五子棋
围棋
象棋
4
五子棋：15×15（15行，15列）
5
一、插入表格
6
智慧锦囊一：
鼠标放到表格右下角，会出现白色的控制点：
快点用左键拖动控制点来调整表格吧。
7
二、认识表格
列 行1718 Nhomakorabea单元格
方向：横行竖列
8
练一练：
下面的表格分别是几行几列？
3行6列
5行3列
9
围棋：19×19 （19行 、19列）
10
三、插入行、列
11
智慧锦囊二：
选中一行或者一列，右击选中：插 入行或者插入列。
思考：还有哪种方法能够 插入行或列？
12
象棋：9×8（9行，8列）
13
四、删除行、列
14
五、合并单元格
wps怎么做表格教程
wps怎么做表格教程WPS是一款常用的办公软件，具有强大的表格功能。
下面将为您详细介绍如何使用WPS做表格。
第一步，打开WPS软件并选择“表格”功能。
在WPS软件界面的左上角，有一个“表格”按钮，点击即可进入表格编辑界面。
第二步，选择合适的表格样式。
WPS提供了多种不同的表格样式供选择，可以根据需求选择合适的样式。
点击“样式”按钮，即可浏览并选择自己喜欢的表格样式。
第三步，设置表格标题。
在表格的第一行，通常是用来设置表格的标题。
可以将鼠标放在第一行的任意一个单元格上，然后输入相应的标题文字。
第四步，填写数据。
在表格的主体部分，可以输入需要展示的数据。
可以通过鼠标点击相应的单元格，然后输入数据，或者直接复制粘贴已有的数据。
第五步，调整表格格式。
在WPS中，可以对表格进行各种格式调整，包括字体样式、字体大小、文字对齐方式等。
选中需要调整的单元格，然后点击“格式”按钮，即可进行相应的调整。
第六步，添加公式和函数。
在表格中，有时候需要进行一些计算，可以使用WPS的公式和函数功能。
在需要进行计算的单元格里，使用等号开始，然后输入公式或者函数表达式。
第七步，插入图表。
WPS也提供了丰富的图表功能，可以在表格中插入各种类型的图表。
选中需要插入图表的数据范围，然后点击“插入”按钮，在弹出的菜单中选择合适的图表类型。
第八步，调整表格布局。
有时候，需要对表格的布局进行调整，可以调整表格的行高、列宽或者合并、拆分单元格。
选中需要调整的行或者列，然后点击“行”或者“列”按钮，在弹出的菜单中选择相应的调整方式。
第九步，保存表格。
在编辑完成后，需要保存表格。
点击界面左上角的“文件”按钮，然后选择“保存”命令，即可把表格保存到指定的位置。
最后，关闭WPS软件。
当不再需要编辑表格时，可以点击界面右上角的“X”按钮，或者选择“文件” - “退出”命令，退出WPS软件。
以上就是使用WPS做表格的基本步骤。
通过这些简单的操作，您可以轻松地创建、编辑和保存自己的表格。
wps工作表格制作教程
wps工作表格制作教程WPS工作表格是一款功能强大、操作简便的电子表格软件。
它具备多样的功能和工具，可用于制作各种类型的表格，如财务报表、数据统计表、项目进度表等。
下面是一个简单的WPS工作表格制作教程，帮助您快速上手该软件。
首先，在启动WPS软件后，点击新建按钮选择“表格”来创建一个新的工作表格文件。
接下来，在工作表格上设置合适的列宽和行高。
您可以通过拖动列或行的边界来调整它们的大小，或者可以在菜单栏的“格式”选项卡中选择“列宽”或“行高”来精确设置。
然后，在表格的顶部添加标题栏。
将鼠标移动至第一行的任意单元格上，点击右键并选择“插入”，然后在下拉菜单中选择“行”。
此时，会在当前行上方插入一行，作为标题栏。
您可以在这些单元格中输入相应的标题，用于表达每一列的含义。
接着，填充表格内容。
在从第二行开始的每一行中输入或粘贴数据，并在每一列中进行必要的计算。
你可以使用基本的数学运算符（+，-，*，/）进行计算操作。
同时，可以根据需要调整字体、背景颜色、边框样式等来优化表格的外观。
此外，您还可以使用一些高级功能来提高表格的可读性和操作性。
例如，可以使用“数据验证”功能设置某些单元格的输入范围和类型，以防止输入错误。
同时，您可以使用“排序”和“筛选”功能对数据进行排序和筛选，以便更方便地查找和分析数据。
最后，在制作完成后，您可以选择将表格保存为WPS工作表格文件，以便于日后的编辑和使用。
同时，您还可以将表格导出为其他格式，如PDF、Excel等，以便于与他人共享或在其他软件中使用。
综上所述，WPS工作表格提供了丰富的功能和工具，使得表格制作变得简单而灵活。
通过此教程，您可以迅速掌握WPS 工作表格的使用方法，从而更高效地处理和分析数据。
无论是在家庭还是工作场所，WPS工作表格都是一款实用的工具，助您事半功倍。
Excel制作五子棋vba源代码
Excel制作象棋vba源代码' The algorithm of judge and urgentpoint function are exported from one VC program which I downloaded from web.' Sorry I can't remebered the program and the author name.' The original VC program have three options for different level. I simplized it to the hardest one in this VBA sample.'Dim m_Board(17, 17) As IntegerPrivate Type Cpointx As Integery As IntegerEnd TypeDim m_nType As IntegerDim iWho As IntegerPrivate Sub Excelba_Click()End SubPrivate Sub cmdStart_Click()Cells(17, 1) = "Start"Cells(17, 3) = 0 ' total number of stones'clear the boardRange(Cells(17 + 1, 1), Cells(17 + 15, 15)).Value = 0'clear all picture in this sheet except for two orginal pictureFor Each ipic In ActiveSheet.ShapesIf <> "Picture 9" And <> "Picture 10" And Left(, 7) = "Picture" Thenipic.DeleteEnd IfNext'start itIf optComputer.Value = True ThenCall drawit(8, 8, 1)Call setarray(8, 8, 1)Cells(17, 3) = 1End IfEnd SubPrivate Sub optComputer_Click()Cells(17, 1) = ""Cells(17, 2) = 2Cells(17, 3) = 0End SubPrivate Sub optYou_Click()Cells(17, 1) = ""Cells(17, 2) = 1Cells(17, 3) = 0End SubPrivate Function confArray(ix As Integer, iy As Integer) As IntegerconfArray = Cells(17 + ix, iy)End FunctionPrivate Sub setarray(ix As Integer, iy As Integer, iz As Integer)Cells(17 + ix, iy) = izEnd SubPrivate Sub drawit(ix As Integer, iy As Integer, iz As Integer)Dim strP As StringIf ix < 1 Or ix > 15 Or iy < 1 Or iy > 15 Or iz < 1 Or iz > 2 ThenMsgBox "Wrong Entry Number, please check it!", vbCritical, "Wrong Entry"EndEnd IfIf iz = 1 ThenstrP = "Picture 9"ElseIf iz = 2 ThenstrP = "Picture 10"End IfApplication.ScreenUpdating = FalseActiveSheet.Shapes(strP).SelectSelection.CopyCells(16, 4).SelectActiveSheet.Paste-(Selection.Left - Cells(ix, iy).Left) + 1-(Selection.Top - Cells(ix, iy).Top) + 1Cells(17, 4).SelectApplication.ScreenUpdating = TrueEnd SubPrivate Function UrgentPoint(ByVal iz As Integer) As StringDim i, i0, j, j0 As IntegerDim ptUrgent(2025) As CpointDim nGrade1 As IntegerDim nGrade2 As IntegerDim nUrgent1 As IntegerDim nUrgent2 As IntegerDim nUrgent As IntegerDim iEnd As IntegerDim iStep As IntegerDim jEnd As IntegerDim jStep As IntegerFor i = 0 To 2024ptUrgent(i).x = -1ptUrgent(i).y = -1Next iIf ((Rnd() * 32767) Mod 2) = 0 Theni0 = 0Elsei0 = 14End IfIf i0 = 0 TheniEnd = 14iStep = 1ElseiEnd = 0iStep = -1End IfFor i = i0 To iEnd Step iStepIf ((Rnd() * 32767) Mod 2) = 0 Thenj0 = 0Elsej0 = 14End IfIf j0 = 0 ThenjEnd = 14jStep = 1ElsejEnd = 0jStep = -1End IfFor j = j0 To jEnd Step jStepIf (m_Board(i, j) = 0) ThennGrade1 = Judge(i, j, iz)nGrade2 = Judge(i, j, iz + 1)Select Case (nGrade1)Case 0nUrgent1 = 0Case 1nUrgent1 = 2Case 2nUrgent1 = 4Case 3nUrgent1 = 5Case 4nUrgent1 = 8Case 5nUrgent1 = 10Case 6nUrgent1 = 11nUrgent1 = 12 Case 8nUrgent1 = 13 Case 9nUrgent1 = 14 Case 10nUrgent1 = 15 Case 11nUrgent1 = 16 Case 12nUrgent1 = 17 Case 13nUrgent1 = 18 Case 14nUrgent1 = 19 Case 15nUrgent1 = 20 Case 16nUrgent1 = 32 Case 17nUrgent1 = 34 Case 18nUrgent1 = 36 Case 19nUrgent1 = 38 Case 20nUrgent1 = 40 Case ElsenUrgent1 = 40 End SelectSelect Case (nGrade2)Case 0nUrgent2 = 1 Case 1nUrgent2 = 3 Case 2nUrgent2 = 6 Case 3nUrgent2 = 7 Case 4nUrgent2 = 9 Case 5nUrgent2 = 21nUrgent2 = 22Case 7nUrgent2 = 23Case 8nUrgent2 = 24Case 9nUrgent2 = 25Case 10nUrgent2 = 26Case 11nUrgent2 = 27Case 12nUrgent2 = 28Case 13nUrgent2 = 29Case 14nUrgent2 = 30Case 15nUrgent2 = 31Case 16nUrgent2 = 33Case 17nUrgent2 = 35Case 18nUrgent2 = 37Case 19nUrgent2 = 39Case 20nUrgent2 = 41Case ElsenUrgent2 = 41End SelectnUrgent = WorksheetFunction.Min(nUrgent1, nUrgent2) * 45 + WorksheetFunction.Max(nUrgent1, nUrgent2)ptUrgent(nUrgent).x = iptUrgent(nUrgent).y = jEnd IfNext jNext iFor i = 0 To 2024If ((ptUrgent(i).x <> -1) And (ptUrgent(i).y <> -1)) ThenExit ForEnd IfNext iIf (ptUrgent(i).x = -1 And ptUrgent(i).y = -1) ThenMsgBox "Make Draw"End IfUrgentPoint = ptUrgent(i).x & "|" & ptUrgent(i).yEnd FunctionPrivate Sub Worksheet_SelectionChange(ByVal Target As Range)Dim ix As IntegerDim iy As IntegerDim iz As IntegerDim ix1 As IntegerDim iy1 As IntegerDim stmp As StringDim i As IntegerDim j As IntegerIf > 1 Or Target.Areas(1).Columns.Count > 1 Or Target.Areas(1).Rows.Count > 1 Then Exit SubEnd Ifix = Target.Areas(1).Rowiy = Target.Areas(1).Columniz = confArray(ix, iy)If ix > 15 Or iy > 15 ThenExit SubEnd IfIf iz <> 1 And iz <> 2 And Cells(17, 1) = "Start" ThenFor i = 0 To 14For j = 0 To 14m_Board(j, i) = Cells(17 + i + 1, j + 1)Next jNext iCall drawit(ix, iy, 2)Call setarray(ix, iy, 2)m_Board(iy - 1, ix - 1) = 2Call Judge(iy - 1, ix - 1, 2)Call ringIf Cells(17, 1) = "Start" Thenstmp = UrgentPoint(1)iy1 = Left(stmp, InStr(1, stmp, "|") - 1)ix1 = Mid(stmp, InStr(1, stmp, "|") + 1)Call drawit(ix1 + 1, iy1 + 1, 1)Call setarray(ix1 + 1, iy1 + 1, 1)m_Board(iy1, ix1) = 1Call Judge(iy1, ix1, 1)Call ringEnd IfEnd IfEnd SubPrivate Function Judge(ByVal nX As Integer, ByVal nY As Integer, ByVal cValue As Integer) As IntegerDim nGrade As IntegerDim i As IntegerDim j As IntegerDim k As IntegerDim l As IntegerDim nXStart As IntegerDim nXEnd As IntegerDim nYStart As IntegerDim nYEnd As IntegerDim nXYStart As IntegerDim nXYEnd As IntegerDim nYXStart As IntegerDim nYXEnd As IntegerDim nXStartAdd As IntegerDim nYStartAdd As IntegerDim nXYStartAdd As IntegerDim nYXStartAdd As IntegerDim nXEndAdd As IntegerDim nYEndAdd As IntegerDim nXYEndAdd As IntegerDim nYXEndAdd As IntegerDim bXStartEmpty As BooleanDim bXEndEmpty As BooleanDim bXStartEmpty1 As BooleanDim bXEndEmpty1 As BooleanDim bYStartEmpty As BooleanDim bYEndEmpty As BooleanDim bYStartEmpty1 As BooleanDim bYEndEmpty1 As BooleanDim bXYStartEmpty As BooleanDim bXYEndEmpty As BooleanDim bXYStartEmpty1 As BooleanDim bXYEndEmpty1 As BooleanDim bYXStartEmpty As BooleanDim bYXEndEmpty As BooleanDim bYXStartEmpty1 As BooleanDim bYXEndEmpty1 As BooleannXStart = nXnXEnd = nXnYStart = nYnYEnd = nYnXYStart = nXnXYEnd = nXnYXStart = nXnYXEnd = nXnXStartAdd = 0nYStartAdd = 0nXYStartAdd = 0nYXStartAdd = 0nXEndAdd = 0nYEndAdd = 0nXYEndAdd = 0nYXEndAdd = 0bXStartEmpty = FalsebYStartEmpty = FalsebXYStartEmpty = FalsebYXStartEmpty = FalsebXEndEmpty = FalsebYEndEmpty = FalsebXYEndEmpty = FalsebYXEndEmpty = FalsebXStartEmpty1 = FalsebYStartEmpty1 = FalsebXYStartEmpty1 = FalsebYXStartEmpty1 = FalsebXEndEmpty1 = FalsebYEndEmpty1 = FalsebXYEndEmpty1 = FalsebYXEndEmpty1 = FalseFor i = nX - 1 To 0 Step -1 ' <-If m_Board(i, nY) = cV alue ThennXStart = iElseIf m_Board(i, nY) = 0 ThenbXStartEmpty = TrueFor j = i - 1 To 0 Step -1 ' <-If m_Board(j, nY) = cValue ThennXStartAdd = i - jElseIf m_Board(j, nY) = 0 ThenbXStartEmpty1 = TrueExit ForElseExit ForEnd IfNext jExit ForElseExit ForEnd IfNext iFor i = nX + 1 To 14 ' ->If m_Board(i, nY) = cV alue ThennXEnd = iElseIf m_Board(i, nY) = 0 ThenbXEndEmpty = TrueFor j = i + 1 To 14 ' ->If m_Board(j, nY) = cValue ThennXEndAdd = j - iElseIf m_Board(j, nY) = 0 ThenbXEndEmpty1 = TrueExit ForElseExit ForEnd IfNext jExit ForElseExit ForEnd IfNext iFor i = nY - 1 To 0 Step -1 ' ^|^If m_Board(nX, i) = cV alue ThennYStart = iElseIf m_Board(nX, i) = 0 ThenbYStartEmpty = TrueFor j = i - 1 To 0 Step -1 ' <-If m_Board(nX, j) = cValue ThennYStartAdd = i - jElseIf m_Board(nX, j) = 0 ThenbYStartEmpty1 = TrueExit ForElseExit ForEnd IfNext jExit ForElseExit ForEnd IfNext iFor i = nY + 1 To 14 ' v|vIf m_Board(nX, i) = cV alue ThennYEnd = iElseIf m_Board(nX, i) = 0 ThenbYEndEmpty = TrueFor j = i + 1 To 14 ' ->If m_Board(nX, j) = cValue ThennYEndAdd = j - iElseIf m_Board(nX, j) = 0 ThenbYEndEmpty1 = TrueExit ForElseExit ForEnd IfNext jExit ForElseExit ForEnd IfNext ii = nX - 1j = nY + 1Do While i >= 0 And j < 15'j++If m_Board(i, j) = cValue ThennXYStart = iElseIf m_Board(i, j) = 0 ThenbXYStartEmpty = Truek = i - 1l = j + 1Do While k >= 0 And l < 15If m_Board(k, l) = cValue ThennXYStartAdd = i - kElseIf m_Board(k, l) = 0 ThenbXYStartEmpty1 = TrueExit DoElseExit DoEnd Ifk = k - 1l = l + 1LoopElseExit DoEnd Ifi = i - 1j = j + 1Loopi = nX + 1j = nY - 1Do While i < 15 And j >= 0'j--If m_Board(i, j) = cValue ThennXYEnd = iElseIf m_Board(i, j) = 0 ThenbXYEndEmpty = Truek = i + 1l = j - 1Do While l >= 0 And k < 15If m_Board(k, l) = cValue ThennXYEndAdd = i - kElseIf m_Board(k, l) = 0 ThenbXYEndEmpty1 = TrueExit DoElseExit DoEnd Ifk = k + 1l = l - 1LoopExit DoElseExit DoEnd Ifi = i + 1j = j - 1Loopi = nX - 1j = nY - 1Do While i >= 0 And j >= 0'j--If m_Board(i, j) = cValue ThennYXStart = iElseIf m_Board(i, j) = 0 ThenbYXStartEmpty = Truel = j - 1Do While l >= 0 And k >= 0If m_Board(k, l) = cValue ThennYXStartAdd = i - kElseIf m_Board(k, l) = 0 ThenbYXStartEmpty1 = TrueExit DoElseExit DoEnd Ifk = k - 1l = l - 1LoopExit DoElseExit DoEnd Ifi = i - 1j = j - 1Loopi = nX + 1j = nY + 1Do While i < 15 And j < 15'j--If m_Board(i, j) = cValue ThennYXEnd = iElseIf m_Board(i, j) = 0 ThenbYXEndEmpty = Truek = i - 1l = j - 1Do While l < 15 And k < 15If m_Board(k, l) = cValue ThennYXEndAdd = i - kElseIf m_Board(k, l) = 0 ThenbYXEndEmpty1 = TrueExit DoElseExit DoEnd Ifk = k + 1l = l + 1LoopExit DoElseExit DoEnd Ifi = i + 1j = j + 1LoopnXStep = nXEnd - nXStart + 1nXStep = nXEnd - nXStart + 1nYStep = nYEnd - nYStart + 1nXYStep = nXYEnd - nXYStart + 1nYXStep = nYXEnd - nYXStart + 1Dim bX_4 As BooleanDim bY_4 As BooleanDim bXY_4 As BooleanDim bYX_4 As BooleanDim bX4 As BooleanDim bY4 As BooleanDim bXY4 As BooleanDim bYX4 As BooleanbX_4 = (nXStep = 4) And (bXStartEmpty And bXEndEmpty)bY_4 = (nYStep = 4) And (bYStartEmpty And bYEndEmpty)bXY_4 = (nXYStep = 4) And (bXYStartEmpty And bXYEndEmpty) bYX_4 = (nYXStep = 4) And (bYXStartEmpty And bYXEndEmpty) bX4 = (nXStep = 4) And (bXStartEmpty Or bXEndEmpty)bY4 = (nYStep = 4) And (bYStartEmpty Or bYEndEmpty)bXY4 = (nXYStep = 4) And (bXYStartEmpty Or bXYEndEmpty) bYX4 = (nYXStep = 4) And (bYXStartEmpty Or bYXEndEmpty) Dim bX_3 As BooleanDim bY_3 As BooleanDim bXY_3 As BooleanDim bYX_3 As BooleanDim bX3 As BooleanDim bY3 As BooleanDim bXY3 As BooleanDim bYX3 As BooleanbX_3 = (nXStep = 3) And (bXStartEmpty And bXEndEmpty)bY_3 = (nYStep = 3) And (bYStartEmpty And bYEndEmpty)bXY_3 = (nXYStep = 3) And (bXYStartEmpty And bXYEndEmpty) bYX_3 = (nYXStep = 3) And (bYXStartEmpty And bYXEndEmpty) bX3 = (nXStep = 3) And (bXStartEmpty Or bXEndEmpty)bY3 = (nYStep = 3) And (bYStartEmpty Or bYEndEmpty)bXY3 = (nXYStep = 3) And (bXYStartEmpty Or bXYEndEmpty) bYX3 = (nYXStep = 3) And (bYXStartEmpty Or bYXEndEmpty) Dim bX_2 As BooleanDim bY_2 As BooleanDim bXY_2 As BooleanDim bYX_2 As BooleanDim bX2 As BooleanDim bY2 As BooleanDim bXY2 As BooleanDim bYX2 As BooleanbX_2 = (nXStep = 2) And (bXStartEmpty And bXEndEmpty)bY_2 = (nYStep = 2) And (bYStartEmpty And bYEndEmpty)bXY_2 = (nXYStep = 2) And (bXYStartEmpty And bXYEndEmpty) bYX_2 = (nYXStep = 2) And (bYXStartEmpty And bYXEndEmpty) bX2 = (nXStep = 2) And (bXStartEmpty Or bXEndEmpty)bY2 = (nYStep = 2) And (bYStartEmpty Or bYEndEmpty)bXY2 = (nXYStep = 2) And (bXYStartEmpty Or bXYEndEmpty) bYX2 = (nYXStep = 2) And (bYXStartEmpty Or bYXEndEmpty) Dim bX_1 As BooleanDim bY_1 As BooleanDim bXY_1 As BooleanDim bYX_1 As BooleanbX_1 = (nXStep = 1) And (bXStartEmpty And bXEndEmpty)bY_1 = (nYStep = 1) And (bYStartEmpty And bYEndEmpty)bXY_1 = (nXYStep = 1) And (bXYStartEmpty And bXYEndEmpty) bYX_1 = (nYXStep = 1) And (bYXStartEmpty And bYXEndEmpty) Dim nXAdd As IntegerDim nYAdd As IntegerDim nXYAdd As IntegerDim nYXAdd As IntegernXAdd = 0nYAdd = 0nXYAdd = 0nYXAdd = 0If nXEndAdd >= nXStartAdd ThennXAdd = nXEndAddbXEndEmpty = bXEndEmpty1ElsenXAdd = nXStartAddbXStartEmpty = bXStartEmpty1End IfIf (nYEndAdd >= nYStartAdd) ThennYAdd = nYEndAddbYEndEmpty = bYEndEmpty1ElsenYAdd = nYStartAddbYStartEmpty = bYStartEmpty1End IfIf (nXYEndAdd >= nXYStartAdd) ThennXYAdd = nXYEndAddbXYEndEmpty = bXYEndEmpty1ElsenXYAdd = nXYStartAddbXYStartEmpty = bXYStartEmpty1End IfIf (nYXEndAdd >= nYXStartAdd) ThennYXAdd = nYXEndAddbYXEndEmpty = bYXEndEmpty1ElsenYXAdd = nYXStartAddbYXStartEmpty = bYXStartEmpty1End IfDim b1X_4 As BooleanDim b1Y_4 As BooleanDim b1XY_4 As BooleanDim b1YX_4 As BooleanDim b1X4 As BooleanDim b1Y4 As BooleanDim b1XY4 As BooleanDim b1YX4 As Booleanb1X_4 = (nXStep + nXAdd >= 4) And (bXStartEmpty And bXEndEmpty)b1Y_4 = (nYStep + nY Add >= 4) And (bYStartEmpty And bYEndEmpty)b1XY_4 = (nXYStep + nXYAdd >= 4) And (bXYStartEmpty And bXYEndEmpty) b1YX_4 = (nYXStep + nYXAdd >= 4) And (bYXStartEmpty And bYXEndEmpty) b1X4 = (nXStep + nXAdd >= 4) And (bXStartEmpty Or bXEndEmpty)b1Y4 = (nYStep + nY Add >= 4) And (bYStartEmpty Or bYEndEmpty)b1XY4 = (nXYStep + nXY Add >= 4) And (bXYStartEmpty Or bXYEndEmpty)b1YX4 = (nYXStep + nYXAdd >= 4) And (bYXStartEmpty Or bYXEndEmpty) Dim b1X_3 As BooleanDim b1Y_3 As BooleanDim b1XY_3 As BooleanDim b1YX_3 As Booleanb1X_3 = (nXStep + nXAdd >= 3) And (bXStartEmpty And bXEndEmpty)b1Y_3 = (nYStep + nY Add >= 3) And (bYStartEmpty And bYEndEmpty)b1XY_3 = (nXYStep + nXYAdd >= 3) And (bXYStartEmpty And bXYEndEmpty) b1YX_3 = (nYXStep + nYXAdd >= 3) And (bYXStartEmpty And bYXEndEmpty) m_nType = -1'////////If (nXStep >= 5) Or (nYStep >= 5) Or (nXYStep >= 5) Or (nYXStep >= 5) Then nGrade = 0m_nType = 0ElseIf (bX_4 Or bY_4 Or bXY_4 Or bYX_4) ThennGrade = 1m_nType = 1ElseIf ((bX4 And (bY4 Or bXY4 Or bYX4 Or b1Y4 Or b1XY4 Or b1YX4)) Or _(bY4 And (bX4 Or bXY4 Or bYX4 Or b1X4 Or b1XY4 Or b1YX4)) Or _(bXY4 And (bY4 Or bX4 Or bYX4 Or b1Y4 Or b1X4 Or b1YX4)) Or _(bYX4 And (bY4 Or bXY4 Or bX4 Or b1Y4 Or b1XY4 Or b1X4)) Or _(b1X4 And (bY4 Or bXY4 Or bYX4 Or b1Y4 Or b1XY4 Or b1YX4)) Or _(b1Y4 And (bX4 Or bXY4 Or bYX4 Or b1X4 Or b1XY4 Or b1YX4)) Or _(b1XY4 And (bY4 Or bX4 Or bYX4 Or b1Y4 Or b1X4 Or bYX4)) Or _(b1YX4 And (bY4 Or bXY4 Or bX4 Or b1Y4 Or b1XY4 Or b1X4))) Then nGrade = 2m_nType = 1ElseIf ((bX4 And (bY_3 Or bXY_3 Or bYX_3 Or b1Y_3 Or b1XY_3 Or b1YX_3)) Or _ (bY4 And (bX_3 Or bXY_3 Or bYX_3 Or b1X_3 Or b1XY_3 Or b1YX_3)) Or _(bXY4 And (bY_3 Or bX_3 Or bYX_3 Or b1Y_3 Or b1X_3 Or b1YX_3)) Or _(bYX4 And (bY_3 Or bXY_3 Or bX_3 Or b1Y_3 Or b1XY_3 Or b1X_3)) Or _(b1X4 And (bY_3 Or bXY_3 Or bYX_3 Or b1Y_3 Or b1XY_3 Or b1YX_3)) Or _(b1Y4 And (bX_3 Or bXY_3 Or bYX_3 Or b1X_3 Or b1XY_3 Or b1YX_3)) Or _(b1XY4 And (bY_3 Or bX_3 Or bYX_3 Or b1Y_3 Or b1X_3 Or b1YX_3)) Or _(b1YX4 And (bY_3 Or bXY_3 Or bX_3 Or b1Y_3 Or b1XY_3 Or b1X_3))) ThennGrade = 3m_nType = 1ElseIf ((bX_3 And (bY_3 Or bXY_3 Or bYX_3 Or b1Y_3 Or b1XY_3 Or b1YX_3)) Or _ (bY_3 And (bX_3 Or bXY_3 Or bYX_3 Or b1X_3 Or b1XY_3 Or b1YX_3)) Or _(bXY_3 And (bY_3 Or bX_3 Or bYX_3 Or b1Y_3 Or b1X_3 Or b1YX_3)) Or _(bYX_3 And (bY_3 Or bXY_3 Or bX_3 Or b1Y_3 Or b1XY_3 Or b1X_3)) Or _(b1X_3 And (bY_3 Or bXY_3 Or bYX_3 Or b1Y_3 Or b1XY_3 Or b1YX_3)) Or _(b1Y_3 And (bX_3 Or bXY_3 Or bYX_3 Or b1X_3 Or b1XY_3 Or b1YX_3)) Or _(b1XY_3 And (bY_3 Or bX_3 Or bYX_3 Or b1Y_3 Or b1X_3 Or b1YX_3)) Or _(b1YX_3 And (bY_3 Or bXY_3 Or bX_3 Or b1Y_3 Or b1XY_3 Or b1X_3))) ThennGrade = 4m_nType = 2ElseIf ((bXY4 And (bYX_2 Or bY_2 Or bX_2)) Or _(bYX4 And (bXY_2 Or bY_2 Or bX_2)) Or _(bX4 And (bXY_2 Or bYX_2 Or bY_2)) Or _(bY4 And (bXY_2 Or bYX_2 Or bX_2))) ThennGrade = 5m_nType = 1ElseIf ((bXY4 And (bYX3 Or bY3 Or bX3)) Or _(bYX4 And (bXY3 Or bY3 Or bX3)) Or _(bX4 And (bXY3 Or bYX3 Or bY3)) Or _(bY4 And (bXY3 Or bYX3 Or bX3))) Then nGrade = 6m_nType = 1ElseIf ((bXY4 And (bYX_1 Or bY_1 Or bX_1)) Or _(bYX4 And (bXY_1 Or bY_1 Or bX_1)) Or _(bX4 And (bXY_1 Or bYX_1 Or bY_1)) Or _(bY4 And (bXY_1 Or bYX_1 Or bX_1))) Then nGrade = 7m_nType = 2ElseIf ((bXY4 And (bYX2 Or bY2 Or bX2)) Or _(bYX4 And (bXY2 Or bY2 Or bX2)) Or _(bX4 And (bXY2 Or bYX2 Or bY2)) Or _(bY4 And (bXY2 Or bYX2 Or bX2))) Then nGrade = 8m_nType = 1ElseIf (bXY4 Or bYX4 Or bX4 Or bY4) ThennGrade = 9m_nType = 1ElseIf ((bXY_3 And (bYX_2 Or bY_2 Or bX_2)) Or _(bYX_3 And (bXY_2 Or bY_2 Or bX_2)) Or _(bX_3 And (bXY_2 Or bYX_2 Or bY_2)) Or _(bY_3 And (bXY_2 Or bYX_2 Or bX_2))) Then nGrade = 10m_nType = 2ElseIf ((bXY_3 And (bYX3 Or bY3 Or bX3)) Or _(bYX_3 And (bXY3 Or bY3 Or bX3)) Or _(bX_3 And (bXY3 Or bYX3 Or bY3)) Or _(bY_3 And (bXY3 Or bYX3 Or bX3))) Then nGrade = 11m_nType = 2ElseIf ((bXY_3 And (bYX_1 Or bY_1 Or bX_1)) Or _(bYX_3 And (bXY_1 Or bY_1 Or bX_1)) Or _(bX_3 And (bXY_1 Or bYX_1 Or bY_1)) Or _(bY_3 And (bXY_1 Or bYX_1 Or bX_1))) Then nGrade = 12m_nType = 2ElseIf ((bXY_3 And (bYX2 Or bY2 Or bX2)) Or _(bYX_3 And (bXY2 Or bY2 Or bX2)) Or _(bX_3 And (bXY2 Or bYX2 Or bY2)) Or _(bY_3 And (bXY2 Or bYX2 Or bX2))) ThennGrade = 13m_nType = 2ElseIf (bXY_3 Or bYX_3 Or bX_3 Or bY_3) ThennGrade = 14m_nType = 2ElseIf (bXY_2 Or bYX_2 Or bX_2 Or bY_2) ThennGrade = 16ElseIf (bXY3 Or bYX3 Or bX3 Or bY3) ThennGrade = 17ElseIf (bXY2 Or bYX2 Or bX2 Or bY2) ThennGrade = 18ElseIf (bXY_1 Or bYX_1 Or bX_1 Or bY_1) ThennGrade = 19ElsenGrade = 20End IfIf (nGrade > 15) ThenIf (((nX - 2) >= 0) And ((nY - 2) >= 0)) ThenIf ((m_Board(nX, nY - 1) = 0 Or m_Board(nX, nY - 1) = cValue) And _(m_Board(nX + 1, nY) = 0 Or m_Board(nX + 1, nY) = cValue) And _(m_Board(nX, nY + 1) = 0 Or m_Board(nX, nY + 1) = cValue) And _(m_Board(nX - 1, nY) = 0 Or m_Board(nX - 1, nY) = cValue) And _((nX + 2 < 15 And nY - 2 >= 0 And (m_Board(nX + 2, nY - 2) = 0 Or m_Board(nX + 2, nY - 2) = cValue) And _m_Board(nX, nY - 2) = cValue And m_Board(nX + 1, nY - 1) = cValue And m_Board(nX + 2, nY) = cValue) Or _(nX + 2 < 15 And nY + 2 < 15 And (m_Board(nX + 2, nY + 2) = 0 Or m_Board(nX + 2, nY + 2) = cValue) And _m_Board(nX, nY + 2) = cV alue And m_Board(nX + 1, nY + 1) = cValue And m_Board(nX + 2, nY) = cValue) Or _(nX - 2 >= 0 And nY + 2 < 15 And (m_Board(nX - 2, nY + 2) = 0 Or m_Board(nX - 2, nY + 2) = cValue) And _m_Board(nX, nY + 2) = cValue And m_Board(nX - 1, nY + 1) = cV alue And m_Board(nX - 2, nY) = cValue) Or _(nX - 2 >= 0 And nY - 2 >= 0 And (m_Board(nX - 2, nY - 2) = 0 Or m_Board(nX - 2, nY - 2) = cValue) And _m_Board(nX, nY - 2) = cV alue And m_Board(nX - 1, nY - 1) = cValue And m_Board(nX - 2, nY) = cValue))) ThennGrade = 15End IfEnd IfEnd IfiWho = cValueJudge = nGradeEnd FunctionPrivate Sub ring()Cells(17, 3) = Cells(17, 3) + 1If m_nType = 0 ThenIf iWho = 2 ThenIf Cells(17, 3) < 16 ThenMsgBox "Congratulation!! You win by only total " & Cells(17, 3) & " stones, you are cool!"ElseMsgBox "Congratulation!! You win by total " & Cells(17, 3) & " stones, still OK!"End IfElseIf Cells(17, 3) < 16 ThenMsgBox "Sorry!! Computer win by only total " & Cells(17, 3) & " stones, you are bad player!"ElseMsgBox "Sorry!! Computer win by total " & Cells(17, 3) & " stones, you need more practices!"End IfEnd IfCells(17, 1) = ""Cells(17, 3) = 0Range(Cells(17 + 1, 1), Cells(17 + 15, 15)).Value = 0EndEnd IfEnd Sub。
深圳优质微课教案 初一信息技术《表格的设计与制作—棋盘篇》
表格的设计与制作—棋盘篇一、指导思想信息技术已经走进人们的日常生活，渗透到社会生活的每一个角落。
新课程理念下的信息技术教育具备了一定的时代性、基础性、创造性、开放性，同时还具有一定的人文性、文化性，强调培养学生的信息素养。
因此，信息技术教学不仅要注重学生知识的主动探究，还应注重学生能力素质的培养；同时更应关注提高学生利用信息技术解决现实生活中各类问题的能力，所以，信息技术教师应该注重结合学生生活中具体的、生动的人生体验和案例开展教学。
本课例的设计主要依据广东省初级中学课本《信息技术》第一册（上）第二章第三节《表格的设计与制作》内容。
二、教学目标设计(一)知识与技能1.理解表格中的行、列、表头、单元格的概念；2.了解运用表格整理信息的过程，能绘制简单的表格；3.能根据需求修饰表格。
(二）过程与方法1.通过“中国象棋棋盘”的制作，让学生逐渐掌握各种表格制作和装饰的工具，逐渐感悟制作表格的一般规律和步骤；2.学生通过自主探究学习，在根据“轮船时刻通告”等原始材料转换成表格的设计、制作过程中，学会如何根据应用需求，对信息进行加工处理、设计表格，体验信息技术在生活中的具体应用；3.能够发表观点、交流思想、开展协作。
（三）情感态度与价值观1.通过制作和设计表格，逐步培养学生利用信息技术解决生活问题的能力。
2.通过了解表格的作用，能够自觉在生活中利用表格方式整理、分析数据，表达观点。
三、教学内容设计（一）教学内容设定1．Word2003软件中创建表格、修改表格的方法；2．Word2003软件中修饰表格的方法。
3．Word2003软件中输入文字，设置表格内文字对齐方式的方法。
（二）教学内容分析本节课教学内容涉及到Word2003文档中插入表格、编辑表格和修饰表格，通过“中国象棋盘”、“航船时刻表”两个表格的制作和创作活动，既避免了单纯的技能操作教学，又让学生领悟到表格的优点和作用，逐步形成利用表格整理、分析数据的意识和习惯。
word绘制中国象棋棋盘[整理版]
![word绘制中国象棋棋盘[整理版]](https://img.taocdn.com/s3/m/3b5c5c991711cc7930b7162f.png)
word绘制中国象棋棋盘[整理版] word绘制中国象棋棋盘
注:本文涉及版权，不得用于商业用途，仅供参考。
用Word就可以轻松绘制出美观、实用的中国象棋棋盘。
一、设置页面
运行Word，点“文件”?“页面设置”，打开“页面设置”对话框。
切换到“纸型”标签卡，在下拉列表中选择或自定义一种纸型。
(选择自定义，宽度设为30厘米，高度设为33厘米，其它选项默认。
二、绘制棋盘
1.插入表格:点击“表格”?“插入表格”，打开“插入表格”对话框，因为中国象棋的棋盘从整体上看是一个9行8列的表格，所以在“列数”一栏的文本框中输入8，“行数”一栏的文本框中输入9，单击“确定”，在Word工作窗口中插入一张9行8列的表格;
2.调整大小:选中刚才插入的整张表格，单击鼠标右键，在弹出的快捷菜单中选择“表格属性”命令，打开“表格属性”对话框，将表格的行高和列宽都设置为3厘米;
3.细节处理:点击“表格”?“绘制表格”，调出“表格和边框”工具栏，利用绘制表格工具，在棋盘上下两端将、帅的活动区域画出“米”字格。
选中表格的第五行，单击右键，在快捷菜单中选择“合并单元格”，将表格第五行的所有单元格合并，这样一张中国象棋棋盘的外形就绘制完成了。
三、修饰棋盘
1.设置边框:选中整张表格，单击鼠标右键，在弹出的快捷菜单选择“表格属性”命令，打开“表格属性”对话框，单击“边框和底纹”按钮，打开“边框和底纹”窗口，根据自己的喜好，对表格的边框和页面边框的线型、粗细、颜色进行设置。
2.添加文字:将光标定位到表格的第五行，输入“楚河汉界”四个字，并根据需要调整文字的字体、大小、颜色和位置。
一张美观、实用的中国象棋棋盘就制作好了，只要联上打印机打印一张就行了。
我用word做棋盘
本义：下棋，博弈 。万物皆有初，要说别名妙语也就 从最早的说起，围棋的最早别称为“弈”。
我用word做棋盘
五子棋
围棋
象棋
五子棋：15×15（15行，15列）
一、插入表格
智慧锦囊一：
鼠标放到表格右下角，会出现白色的控制点：
快点用左键拖动控制点来调整表格吧。Biblioteka 二、认识表格列 单元格
行
方向：横行竖列
练一练：
下面的表格分别是几行几列？
3行6列
5行3列
围棋：19×19 （19行 、19列）
三、插入行、列
智慧锦囊二：
选中一行或者一列，右击选中：插 入行或者插入列。
思考：还有哪种方法能够 插入行或列？
象棋：9×8（9行，8列）
四、删除行、列
五、合并单元格
六、绘制表格
你知道吗？
棋艺活动是从中国古代流传下来的益智类游戏，它不
仅能够给丰富我们的课余生活，还能够锻炼我们的思维 能力。国际上更有各种棋类竞技比赛，各国高手切磋技 艺，一决高低。现在，我们能够用word快速的制作出各 类棋盘，下棋就更方便了。希望同学们课下可以多练习， 成为棋类小高手，说不定下个世界冠军就是你！
[表格的制作方法]办公表格制作方法
![[表格的制作方法]办公表格制作方法](https://img.taocdn.com/s3/m/eaf9d603a7c30c22590102020740be1e650eccb8.png)
[表格的制作方法]办公表格制作方法篇一：办公表格制作方法建立表格：表格的建立方式有三种：菜单方式、工具栏按钮方式和自由制表方式。
注意表格建立的位置是在文档关表所在的位置。
下面先逐个进行表格建立方式练习：① 用菜单方式建立表格打开“表格"菜单，指向"表格"，选择"插入"项;在对话框中进行必要的设置选择(建议行和列的设置适中)，然后按"确定"。
观察产生的表格情况。
② 直接点击工具栏上的"插入表格"按钮，用鼠标在出现的表格框内选择合适的行和列，然后点击鼠标左键;观察建立的表格。
③ 点击工具栏上的"表格和边框"，或在工具栏上右击鼠标，在工具菜单中选择"表格和边框"，打开"表格和边框"工具栏;在此工具栏上选择适当的线条后，再点击工具栏最左边的画笔按钮，则鼠标的标志转换成画笔形式，这时，就可以在文档中自由绘制表格。
绘制方法是：按住鼠标左键移动鼠标，然后再放开鼠标，就可得到一条矩形框或一个直线。
线条可以选择粗细，还可选择"无边框"线条格式(画出线条为灰色，打印时无色)。
画错的线条可以用"擦除"按钮方式擦除。
文字表格多是在WORD或WPS中制作的，涉及计算的表格最好在EXCEL中制作。
EXCEL也可以制作文字表格，看你个人的爱好了。
具体使用方法请下载相关的教程，或从网上找说明文章。
不是在这里一两句话可以讲明白的。
打个比方,你如果是搞工资结算的,一个单位几百个人,你每个月都要统计所有的人的应发工资,扣除工资,实际工资等数据,而一年有12个月,也就是12张表格.然后有一天突然领导要求你把1-12个月的数据统一做成一个新的表格形式,而这个总表格和每个月的表格不完全相同(但有一定的相似性),也就是说你不能直接复制到总表格中去,而要一个姓名,一个工资数据的复制到总表格里,面对这种重复,单调,简单,大规模的手工操作,是不是觉得很无奈吧.我研究的这个办公室数据自动化软件就是针对这种情况的,它能自动寻找相关数据,根据设计好的步骤自动填数据,可以在软件里计算公式,还有一定的智能判断功能. 每个月的考核表格,进出人不同,这些东西都要反映到工资表格里,我做的脚本,能自动填这些东西.再举一个例子,假如你有两份相近的很多数据的表格,你的工作是找出这两份表格中不同的数据,根据一定情况做出相应的处理步骤,在这种情况下,也可以利用办公室数据自动化软件,让软件根据先前的设计来自动处理这份工作.你在旁边轻松喝着茶就行了。
用ExcelVBA编的象棋程序
炮8平5炮2 炮8平5炮2 炮8平5炮2 炮8平5炮2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马8 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5马2 炮8平5炮2 炮8平5炮2 炮8平5炮2 炮8平5炮2 炮8平5炮2 炮8平5炮2 炮8平5炮2 炮8平5炮2 炮8平5炮2
相3进5炮2 炮2平5马8 炮2平6炮8 炮2平5炮8 炮2平5炮8 炮2平5炮8 炮2平5炮8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马2 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平5马8 炮2平8 炮2平5炮8 炮2平5炮8 炮2平5炮8 炮2平5炮8 炮2平5炮8 相7进5炮8 炮8平5马2 炮8平4炮2
手画棋谱(excel表格制作应用)
2.调整大小
进阶篇：“五子棋盘”变“象棋棋盘”
1. 删除多余的行数和列数 3. 设置边框。
2. 合并单元格，设置对齐方式 4. 画斜线。
提高篇：动手绘制国际象棋棋盘
添加表格底纹。
小 结
1.插入表格 3.删除（插入）行列 2.调整表格及单元格大小 4.合并（拆分）单元格
5.单元格内容对齐
7.表格斜线的绘制
动手画棋盘
--Word的表格操作
小调查：
1.班里有多少人会下棋？
2.你们都会玩什么棋？
看棋盘猜棋名：
飞行棋
看棋盘猜棋名：
跳棋
看棋盘猜棋名：
军棋
看棋盘猜棋名：
国际象棋
看棋盘猜棋名：
五子棋
看棋盘猜棋名：
围棋
看棋盘猜棋名：
中国象棋
Word中表格的应用
入门篇：动手பைடு நூலகம்制五子棋盘
1.插入表格
6.设置表格边框
8.添加表格底纹。
表格的应用：
用word2003绘制象棋的方法步骤
用word2003绘制象棋的方法步骤
作者：xkbbduwk
1、打开word2003，新建一个空白文档。
2、页面设置：纸张设为宽40cm*高46cm，页边距默认。
3、视图显示比例50%。
4、插入表格：8列9行，行高和列宽为4cm。
5、将第5行合并单元格，插入“楚河汉界”文本框，字号90。
6、点击“格式”菜单，设置边框格式（线型、颜色和粗细）。
7、绘制第一枚棋子（红帅）：
（1）自选图形椭圆工具，按住上档键绘出一个3.48cm*3.48cm的正
圆，填充色褐色，线条颜色为黄色6磅。
（
2）编
辑
文
字
“帅”：字体选“经典隶繁”，红色加粗，字号67。
（3）调整字的位置：（段落）行距为59磅，段前缩进-0.5字符。
▲也可以使用棋子图片制作
棋子 。
8、复制红方其他棋子。
9、复制黑房所有棋子，注意：把字体颜色改为黑色。
帅。
使用WPS进行数据表表制作的技巧
使用WPS进行数据表表制作的技巧使用WPS进行数据表制作的技巧数据表是一种常用于数据整理、分类和分析的工具。
在日常工作和学习中，我们经常需要制作各种数据表格。
WPS表格是一款功能强大的电子表格软件，为我们提供了丰富的操作和功能，能够帮助我们高效地完成数据表的制作。
本文将介绍一些使用WPS进行数据表制作的技巧，使您能更好地利用WPS表格软件。
一、创建数据表在使用WPS表格制作数据表之前，首先需要创建一个新的工作表。
打开WPS表格软件后，点击“文件”菜单，选择“新建”功能，即可创建一个新的工作表。
二、设置数据表样式在制作数据表时，我们可以根据需要设置数据表的样式，使其更加美观和易读。
WPS表格提供了丰富的样式和格式选项，可以实现多种不同的表格样式。
1.改变字体样式：选中需要改变字体样式的文本区域，点击上方的字体样式选项，可以改变字体的字号、颜色、加粗等。
2.设置边框线：选中需要设置边框线的区域，点击上方的边框线选项，并选择需要的边框线样式，如实线、虚线等。
3.设置单元格颜色：选中需要设置单元格颜色的区域，点击上方的填充颜色选项，选择需要的颜色。
4.合并单元格：选中需要合并的单元格区域，点击上方的合并单元格选项，可以合并选中的单元格。
三、数据输入和编辑在制作数据表时，我们需要输入和编辑数据，WPS表格提供了丰富的数据输入和编辑功能，使我们能够方便地进行数据填写和修改。
1.数据输入：在选中的单元格中直接输入数据即可，按下回车键或方向键后自动跳转到下一个单元格。
2.数据复制和填充：将鼠标移动到单元格的右下角，鼠标变成黑色十字，拖动鼠标可以复制或填充数据。
3.数据筛选：点击数据表上方的筛选功能图标，可以实现对数据的筛选，只显示满足条件的数据。
四、插入图表和图形WPS表格不仅可以制作数据表，还可以插入各种图表和图形，用于更直观地展示数据和分析结果。
1.插入图表：选中需要插入图表的数据区域，点击上方的图表功能选项，选择需要的图表类型，如柱状图、折线图等。
wps制作表格教程
wps制作表格教程WPS是一款功能强大的办公软件，可以轻松制作各种文档，包括表格。
下面是关于如何使用WPS制作表格的简要教程，帮助您快速上手。
首先，打开WPS软件并选择“表格”功能。
在打开的表格空白页面中，您可以看到一个由行和列组成的网格状结构。
接下来，您可以开始输入数据。
选中要输入的单元格，然后直接在键盘上键入相应的数据。
您也可以复制和粘贴来快速填充多个单元格。
在制作表格时，您可能需要调整单元格的大小。
选中要调整大小的单元格，将光标移至单元格边缘，鼠标会变为双向箭头。
此时，按住鼠标左键并拖动，即可调整单元格的大小。
对于单元格的格式设置，WPS提供了丰富的选择。
选中单元格或一组单元格，点击工具栏上的“数字”按钮，就可以选择数字格式（如文本、日期、货币等）。
您还可以对文字进行加粗、居中对齐等操作。
WPS还支持对单元格进行合并和拆分。
选中要合并的单元格，点击工具栏上的“合并单元格”按钮，就可以将它们合并为一个大单元格。
如果需要拆分单元格，先选中要拆分的单元格，然后点击工具栏上的“拆分单元格”按钮。
如果表格中的内容很长，可能需要进行分栏操作。
选中要分栏的单元格，点击工具栏上的“分栏”按钮，然后选择要设置的栏数。
表格将自动分为相应的栏数，以便更好地展示内容。
在制作表格时，您可能需要进行一些计算。
WPS提供了各种数学公式和函数供您使用。
选中要进行计算的单元格，然后在公式栏中输入相应的公式或函数。
WPS会自动计算结果并显示在单元格中。
最后，如果您需要对表格进行保存，您可以点击工具栏上的“保存”按钮或使用快捷键“Ctrl + S”。
选择保存路径和文件名后，即可将表格保存到您指定的位置。
以上就是关于使用WPS制作表格的简要教程。
您可以根据实际需求进行更多的设置和操作，并发挥出WPS强大的功能，制作出专业的表格文档。
希望这篇教程对您有所帮助。
用word制作中国象棋
《用word制作中国象棋》教学设计【设计思想】本节课的教学设计思路是：通过观察发现学生课余时间很热衷于下象棋，结合word所学内容，想到用word 来制作中国象棋。
第一阶段，先实行实物展示：棋盘和棋子。
让学生观察讨论，在讨论中发现制作棋盘、棋子的要素。
第二阶段，动手试一试，让学生按照所找出的绘制棋盘、棋子的要素实行制作。
让学生在实践中体会制作象棋的方法。
第三阶段，教师引导学生发现制作过程中一些细节问题。
第四阶段，通过优秀作品展示与交流，激发学生的学习热情。
本节课的设计，教师扮演指导者的角色，教师通过问题和任务引导学生，学生通过试探、讨论和自主学习等活动，理解制作中国象棋的要素，通过实践，学会制作棋盘和棋子，在制作过程中探究表格绘制、自选图形设置及审美水平培养。
【对象分析】学生有较熟练的计算机操作水平，他们对小组活动的形式比较熟悉，也能积极的参与其中，有集体荣誉感，表现力强，也很乐于表现自己，学生很适合小组活动的形式。
在学习的过程中，学生的依赖性强，遇到问题时通常会急于向老师问询答案，思考问题分析问题的水平较弱。
在解决问题方面，学生遇到同类问题的时候，知识迁移的水平较弱。
针对上面的问题，教师引导学生展开小组自主探究活动，让学生在实践中分析问题解决问题，养成良好的学习习惯，学会反思总结，这些都是迫切需要的。
在知识准备方面，学生经过前面课程的学习，掌握了word的基本操作技能：表格制作、艺术字、文本框的制作、图形和自选图形插入。
但对于大多数学生来说，还没有真正地把学科知识和所掌握的基本技能应用到实际问题中，教师在教学过程中要注意引导学生去发现问题、提出问题、分析问题、解决问题。
【教材分析】本节课是人教版《文字处理基础及应用》的第二册第十二节综合应用《电子报纸的制作》之后，老师结合学生的爱好，设计的一个综合应用课题。
在本节课以前，掌握了文字处理软件的一些基本技巧，包括文本框、艺术字、自选图形、表格制作等知识技能。
用ExcelVBA编的象棋程序
用ExcelVBA编的象棋程序相3进5炮2平4马8进9兵1进1车9平8马2进1兵3进1相7进5马2进3马8进7士4进5车1平2车1平4炮8平9炮2进炮2平5马8进7马2进3车9平8车1平2马2进3兵3进1兵3进1马8进9士4进5炮8进4相7进5车2进6兵1进1炮8平炮2平6炮8平5马2进3马8进7士4进5车9平8相3进5车8进4车1平4马2进3车4进7马7退8车4退1兵3进1炮8进炮2平5炮8平5马2进3马8进7车1平2车9进1马8进7车9平4兵3进1马2进3兵7进1车1进1士6进5车4进5相7进炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7马2进3车6进5车1进2炮8进2炮2进2炮8平炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7马2进3炮8进2炮2进2炮8平7车1进2车6进炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7马2进3炮8进2兵3进1车6进5士4进5炮8平炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1车2进6炮8平9车2平3炮9退1马8进7车1进1炮8平炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1车2进6炮8平9车2平3炮9退1马8进7车1进1炮8平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进4炮2平1兵9进炮2平5马8进7马2进3车9平8兵3进1兵3进1车1平2马2进3炮8平7士4进5车9进1马3进2车2进6相3进5车9平炮2平5马8进7马2进3车9平8兵3进1兵3进1车1平2马2进3炮8平7士4进5车9进1马3进2车2进6相3进5车9平炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1车2进6炮8平9车2平3炮9退1兵5进1士4进5兵5进炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1车2进6炮8平9车2平3炮9退1马8进7士4进5马7兵7进1马8进7炮2进4兵5进1炮8进4车9进1炮2平3相7进炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮2进2车2进6马7进6车8进炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮2进2车2进6马7进6车8进炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮2进4车2进4炮8平9车2平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮2进4车2进4炮8平9车2平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮2进4车2进4相3进5兵9进炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮2进4车2进4相3进5兵3进炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进6炮2平1车8平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进6炮2平1车8平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进6炮2平1车8平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进6炮2平1车8平炮2平5马8进7马2进3车9平8车1平2兵7进1车2进6马2进3马8进7马7进6兵5进1兵7进1车2退1兵7进1兵5进炮2平5马8进7马2进3车9平8车1平2兵7进1车2进6马2进3马8进7兵3进1车9进1炮2进1车2退2相3进5兵7进炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1车2进6炮8平9车2平3炮9退1兵5进1士4进5兵5进炮2平5马2进3马2进3马8进7车1平2车9平8马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进4炮2平1兵9兵7进1车2进6炮8平9车2平3炮9退1兵5进1士4进5兵5进炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1车2进6炮8平9车2平3炮9退1兵5进1士4进5兵5进炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1车2进6炮8平9车2平3炮9退1马8进7车1进1炮8平炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1车2进6炮8平9车2平3炮9退1马8进7士4进5马7进炮2平5马8进7马2进3车9平8车1平2马2进3兵7进1兵7进1马8进7炮2进4兵5进1炮8进4车9进1炮2平3相7进炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮2进2车2进6马7进6车8进炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进6炮2平1车8平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进6炮2平1车8平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进6炮2平1车8平炮2平5马8进7马2进3车9平8车1平2马2进3马8进9兵7进1炮8平7车1平2车9平8炮8进4车8进6炮2平1车8平炮2平5马8进7马2进3车9平8车1平2炮8进4兵3进1炮2平5兵7进1马2进3马8进7车1平2车9平8车2进4炮8平炮2平5马8进7马2进3车9平8车1平2兵7进1车2进6马2进3马8进7马7进6兵5进1兵7进1车2退1兵7进1兵5进炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4车6进7马2进3车6平7炮2进2炮8平7马7退5车9进炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7马2进3车6进5炮2进2兵7进1车1进2马7进炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7马2进3车6进5炮2进2车6平7车1进2兵7进炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7马2进3炮8进2兵3进1车6进5士4进5炮8平炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7马2进3炮8进2兵3进1车6进5士4进5炮8平炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7马2进3炮8进2兵3进1车6进5士4进5炮8平炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7士6进5兵3进1马2进3车9进1车1进2车6进炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7士6进5兵3进1马2进3车9进1炮2平1炮8进炮2平5炮8平5马2进3马8进7车1进1车9平8车1平6车8进4马8进7士6进5兵3进1马2进3车9进1兵3进1车6进相7进5炮8平6马2进1兵9进1车1平2马8进9兵7进1相3进5马8进7马2进3士6进5车9平8车9平6炮2平1炮8进炮8平5马2进3马8进7车1平2车9平8马8进7兵7进1兵7进1马2进1士6进5炮2进4相3进5车8进6兵9进1炮2平炮8平4炮2平5马8进7马2进3士6进5车1平2相7进5车2进4车9平6马8进7车6进7马3退2车6退1兵7进1炮2进炮8平5炮2平5马8进7马2进3车9平8车1进1马2进3车1平6兵7进1马8进7兵3进1车9进1士4进5车6进5相3进炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3马8进7车4进5车9进2炮2进2炮8进2炮2平炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3马8进7炮2进2炮8进2炮2平3车9进2车4进炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3马8进7炮2进2兵7进1车4进5士6进5炮2平炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1马2进3车9进1炮2平炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1马2进3车9进1炮2平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮2进4车2进4炮8平9兵1进炮8平5马2进3马8进7车1平2兵7进1兵7进1车9平8马8进7炮2平3士6进5车1进1马7进8车8进6相7进5车1平炮8平5马2进3马8进7车1平2兵7进1兵7进1车9平8马8进7炮2平3士6进5车1进1马7进8车8进6相7进5车1平炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1兵5进1士6进5兵5进炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1马2进3士6进5马3进炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1马2进3炮8进4兵5进1炮2进4车1进1炮8平7相3进炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮8进2车8进6马3进4车2进炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮8进2车8进6马3进4车2进炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮8进4车8进4炮2平1车8平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮8进4车8进4炮2平1车8平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮8进4车8进4相7进5兵1进炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮8进4车8进4相7进5兵7进炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮2进4车2进6炮8平9车2平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮2进4车2进6炮8平9车2平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮2进4车2进6炮8平9车2平炮8平5马2进3马8进7车1平2车9平8兵3进1车8进6马8进7马2进3马3进4兵5进1兵3进1车8退1兵3进1兵5进炮8平5马2进3马8进7车1平2车9平8兵3进1车8进6马8进7马2进3兵7进1车1进1炮8进1车8退2相7进5兵3进炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1兵5进1士6进5兵5进炮8平5马8进7马8进7马2进3车9平8车1平2马2进1兵3进1炮2平3车9平8车1平2炮2进4车2进4炮8平9兵1进炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1兵5进1士6进5兵5进炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1兵5进1士6进5兵5进炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1马2进3车9进1炮2平炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1车8进6炮2平1车8平7炮1退1马2进3士6进5马3进炮8平5马2进3马8进7车1平2车9平8马8进7兵3进1兵3进1马2进3炮8进4兵5进1炮2进4车1进1炮8平7相3进炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮8进2车8进6马3进4车2进炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮2进4车2进6炮8平9车2平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮2进4车2进6炮8平9车2平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1兵3进1炮2平3车9平8车1平2炮2进4车2进6炮8平9车2平炮8平5马2进3马8进7车1平2车9平8马8进7马2进1平炮8平5马2进3马8进7车1平2车9平8炮2进4兵7进1炮8平5兵3进1马8进7马2进3车9平8车1平2车8进4炮2平炮8平5马2进3马8进7车1平2车9平8兵3进1车8进6马8进7马2进3马3进4兵5进1兵3进1车8退1兵3进1兵5进炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4车4进7马8进7车4平3炮8进2炮2平3马3退5车1进炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3马8进7车4进5炮8进2兵3进1车9进2马3进炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3马8进7车4进5炮8进2车4平3车9进2兵3进炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3马8进7炮2进2兵7进1车4进5士6进5炮2平炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3马8进7炮2进2兵7进1车4进5士6进5炮2平炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3马8进7炮2进2兵7进1车4进5士6进5炮2平炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3士4进5兵7进1马8进7车1进1车9进2车4进炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3士4进5兵7进1马8进7车1进1炮8平9炮2进炮8平5炮2平5马8进7马2进3车9进1车1平2车9平4车2进4马2进3士4进5兵7进1马8进7车1进1兵7进1车4进平4炮8平9炮2进2车9平8兵9进1兵1进1炮2平9车2进6炮8平6车2进3马9退8车8进4马8进9兵7进1车4进4兵7进1车4平3炮9退2马9进1炮8平7车1进3车9平8车1平3车8进7炮8平9车2平3马7退9兵3进1炮9平7炮5平6车8进3车3平2马9进8兵3进1炮8进4兵1进1炮8平7士4进5车4平3车1进3炮7进3马8进9车3进3兵5进1兵3进1马9进7兵3进1车8平7马8进5相7进9车4平3车9平7车1平62炮8平3炮2平7车9平8炮7进2相3进1兵3进1士6进5车8平4车6平7马3退5兵7进1车1平3车8进6兵3进1车7进2车6进6车8平3车9平8车1平2炮7平3士6进5车6退1车3平7兵7进1炮5平6车8进4相7进5马7进6炮2退1炮5平5炮8平3马3进4车9平8炮2平3车6平5马4进6车5平4马6进5相7进5兵7进1炮3平5车8进3马7退5马7进8 1炮8平9车1平6车3退1炮2平1车9进1车8进6马7进6炮9平7车3平8炮1进4马3退1车8退1车9平6车8平6士6进1炮8平9车1平6车3退1炮2平1车3平8车8进61兵9进1车2进5马9进8兵3进1炮7进3马3进2马8进6相7进5炮7退1士6进5炮5平7马7进6车2进1车8进2后炮退5车9平6炮8平9车2进3马7退8马8进9马8进7车6进5兵3进1车6平8马2进4炮7进2炮2平3兵5进1马4进5相7进5车9平6炮8平9车2进3马7退8马8进9马8进7车6进5兵3进1车6平8马2进4炮7进2炮2平3兵5进1马4进5相7进5兵5进1炮9平7车3平4兵7进1马3进5兵7进1马5进6车8进8马8进7相3进5士4进5兵7平6车4退3炮7进8马6进5马7进6炮9平7车3平4车8进5炮8进2相3进5炮5平6兵3进1兵3进1车8退1兵7进1相5进3炮8平7马3进4车4进3相7进9车1平2车9平6车2进6兵3进1兵7进16车8进4相3进5兵9进1兵3进1车2退3士4进5炮7退1炮8进2兵3进1兵7进1车8平3车8进3炮7平3车2平4士4进6车8进4相3进5车2平4兵3进1兵3进1炮8平7兵3进1兵3进1车8平7炮2平7车4退1前炮进5士4进5前炮平9将59车2平4车8进1兵9进1车8平2兵3进1兵7进1车4平3马7进8车3进5炮9平7车3平2前车进3车8进3前车进2车29车2平4车8进6兵9进1炮2退2兵7进1炮2进2炮7进1车8进2兵3进1车8平7炮7退1车7进1兵3进1炮2平9车8进5兵9进1炮2退2车8进4马7进8车2平4炮8平7炮7进4士4进5车4进1炮2平5车8进5马3退2炮5进3兵5进1 5兵3进1兵7进1车2平3马7进6车3平4车2进4马3进2炮2平5士6进5车2进5马9退8马6退7炮7进4炮8平9马8进1车8平7车2进2车7退2马3进2车7平8马2退4兵9进1相7进5车8进3马4退2车2进1炮1进3马9进8士6进5车2平1车8平7车2进2车7退2马3进2车7平8马2退4兵9进1相7进5车2进1车2进3马9进8马4进2炮7平8士6进5炮5平1车8平7车2进2车7退2马3进2车7平8马2退4车8平6马4进2炮7进7士4进5车6平7车2退2兵3进1相7进5炮7退1车8平7车2进2车7退2相3进5兵3进1马3进2车7平8兵7进1车8平3马2进1炮7退1车2进5炮7平3炮1平3马3退1兵5进1马6退7兵5进1士4进5兵5平4相3进5兵4平3炮8平9车2平5兵7进1兵3进1兵7进1车9进1兵7进1车9平5兵7进1炮8进2车9平6车1平3车6进5炮2进1车6平8兵3进1车2平7车8进1马7进6炮2平3士6进5士6进5炮5平5兵5进1炮9平7车3平4兵7进1马3进5兵7进11兵9进1车2进5马9进8兵3进1炮7进3马3进2马8进6相7进5炮7退1士6进5炮5平8兵5进1相3进5车8进3士4进5兵5进1炮9平7车3平4兵7进1马3进5兵7进15兵5进1炮9平7车3平4兵7进1马3进5兵7平6车4退2兵5进1炮5进3马3进5车4进4炮2退1车4退2相3进5炮8平1炮8平9车1平6车3退1炮2平1车3平8车8进6兵3进1车8平7炮5退1车6进7车9平8车7退1兵5进1炮9平7 5马7进6炮9平7车3平4车8进5炮8进2相3进5炮5平6兵3进1兵3进1车8退1兵7进1相5进3炮8平7马3进4车4进3相7进9车1平2车9平6车2进6兵3进1兵7进16车8进4相3进5车2退3士4进5兵9进1兵3进1炮7退1炮8进2炮7平2马6退7炮2平3车2平4士4进5炮8退1兵3进1车8平7车2进2车7退2马3进2车7平8马2退4兵9进1相7进5车8进3马4退2车2进1马2进3车2平6车8进5车6进1车8平7车2进2车7退2马3进2车7平8马2退4兵9进1相7进5车2进1车2进3马9进8马4进2炮7退1马2进4车2平1车8平7车2进2车7退2马3进2车7平8马2退4车8平6马4进2车6平8马2退4车8平4相7进5兵3进1车2进2车2进1车8平7车2进2车7退2相3进5兵3进1马3进2车7平8兵7进1车8平3马2进1炮7退1车2进5炮7平3炮1平3马3退4炮8平9车2平81兵5进1马6退7兵5进1士4进5兵5平4相3进5兵4平3炮8平9车2平5兵7进15车9进1车1进1车7平9马3退1车9平6马5进3兵3进1士6进5兵7进1车8平6炮7进4兵7进1车6进3炮2进1车6进2马7进6兵3进1兵7进1车8平3车6平7车3平4马6进8车4平2炮8平7马3退5车9进1车1平4车9平4车2平4士4进2兵7进1炮2退3马7进6炮2平4炮5平7车8平4车7进1车1平3炮7进5炮4进1炮7平5车4进1炮5平4车4进2炮8进5炮8平3马3进4车9平8炮2平3车6平5马4进6车5平4马6进5相7进5兵7进1炮3平5车8进3马3退5马7进8车4平5炮8平3马3进4车9平8炮2平3车6平5马4进6车5平4马6进5相7进5兵7进1炮3平5兵3进1相5进7车8进3马7退5炮8平3马3进4车9平8炮2平3车6平5兵7进1炮3平9相3进1车5平9炮3进4兵3进1马7进6车9平3车1平4 2车6进7炮2进2兵7进1兵3进1兵7进1车8平3马7进6兵7进1兵9进1马7进6兵9进1马6进4车6退4炮2退4兵9平1炮8进4车1平2车9平8车8平6车8进3兵1进1车6平8马3进1前车进1车6平2车8进4兵1进1兵9进1炮1进3兵7进1车6进5炮2进2车6平7车1进2车9平4兵7进1车4进3炮5平6炮5平4炮6进5炮8平4相3进5相3进5炮2退4车7平1炮8进2车1平2兵1进1兵9进1炮8平1车8进6炮2平4车8进3马1退2车2进4马2进1兵3进1车6进4兵3进1车6平1炮2平3车9进3车1平2车9平7车2进7炮2平1车8平7马3退1兵7进1炮1平3炮5平4车2进3车7平8马1进2兵7进1炮2进4兵9进1炮2平3士6进5车6平7车9进3炮3进3马2进1车7进3兵5进1兵7进1马1进3兵7进1车2平3马2进进5车6进5相3进1车6平7车1平3车9平42炮2平7炮8平3车1平2炮3进2相7进9兵7进1士4进5车2平6车4平3马7退5兵3进1车9平7车2进6兵7进1车3进2车4进6车2平7车1平2车9平8炮3平7士4进5车4退1车7平3兵3进1炮5平4车2进4相3进5马3进4炮8退1炮5平5炮2平7马7进6车1平2炮8平7车4平5马6进4车5平6马4进5相3进5兵3进1炮7平5车2进3马3退5马3进2 1炮2平1车9平4车7退1炮8平9车1进1车2进6马3进4炮1平3车7平2炮9进4马7退9车2退1车1平4车2平4士4进1炮2平1车9平4车7退1炮8平9车7平2车2进6 9兵1进1车8进5马1进2兵7进1炮3进3马7进8马2进4相3进5炮3退1士4进5炮5平3马3进4车8进1车2进2后炮退5车1平4炮2平1车8进3马3退2马2进1马2进3车4进5兵7进1车4平2马8进6炮3进2炮8平7兵5进1马6进5相3进5车1平4炮2平1车8进3马3退2马2进1马2进3车4进5兵7进1车4平2马8进6炮3进2炮8平7兵5进1马6进5相3进5兵5进1炮1平3车7平6兵3进1马7进5兵3进1马5进4车2进8马2进3相7进5士6进5兵3平4车6退3炮3进8马4进5马3进4炮1平3车7平6车2进5炮2进2相7进5炮5平4兵7进1兵7进1车2退1兵3进1相5进7炮2平3马7进6车6进7相3进1车9平8车1平4车8进6兵7进1兵3进1 4车2进4相7进5兵1进1兵7进1车8退3士6进5炮3退1炮2进2兵7进1兵3进1车2平7车2进3炮3平7车8平6士6进4车2进4相7进5车8平6兵7进1兵7进1炮2平3兵7进1兵7进1车2平3炮8平3车6退1前炮进5士6进5前炮平9将5 1车8平6车2进1兵1进1车2平8兵7进1兵3进1车6平7马3进2车7进5炮1平3车7平8前车进3车2进3前车进2车8 1车8平6车2进6兵1进1炮8退2兵3进1炮8进2炮3进1车2进2兵7进1车2平3炮3退1车3进1兵7进1炮8平1车2进5兵1进1炮8退2车2进4马3进2车8平6炮2平3炮3进4士6进5车6进1炮8平5车2进5马7退8炮5进3兵5进1 5兵7进1兵3进1车8平7马3进4车7平6车8进4马7进8炮8平5士4进5车8进5马1退2马4退3炮3进4炮2平1马2进9车2平3车8进2车3退2马7进8车3平2马8退6兵1进1相3进5车2进3马6退8车8进1炮9进3马1进2士4进5车8平9车2平3车8进2车3退2马7进8车3平2马8退6兵1进1相3进5车8进1车8进3马1进2马6进8炮3平2士4进5炮5平9车2平3车8进2车3退2马7进8车3平2马8退6车2平4马6进8炮3进7士6进5车4平3车8退2兵7进1相3进5炮3退9车2平3车8进2车3退2相7进5兵7进1马7进8车3平2兵3进1车2平7马8进9炮3退1车8进5炮3平7炮9平7马7退1兵5进1马4退3兵5进1士6进5兵5平6相7进5兵6平7炮2平1车8平5兵3进1兵7进1兵3进1车1进1兵3进1车1平5兵3进1炮2进2车1平4车9平7车4进5炮8进1车4平2兵7进1车8平3车2进1马3进4炮8平7士4进5士4进5炮5平5兵5进1炮1平3车7平6兵3进1马7进5兵3进1 9兵1进1车8进5马1进2兵7进1炮3进3马7进8马2进4相3进5炮3退1士4进5炮5平2兵5进1相7进5车2进3士6进5兵5进1炮1平3车7平6兵3进1马7进5兵3进1 5兵5进1炮1平3车7平6兵3进1马7进5兵3平4车6退2兵5进1炮5进3马7进5车6进4炮8退1车6退2相7进5炮2平1炮2平1车9平4车7退1炮8平9车7平2车2进6兵7进1车2平3炮5退1车4进7车1平2车3退1兵5进1炮1平3 5马3进4炮1平3车7平6车2进5炮2进2相7进5炮5平4兵7进1兵7进1车2退1兵3进1相5进7炮2平3马7进6车6进7相3进1车9平8车1平4车8进6兵7进1兵3进1 4车2进4相7进5车8退3士6进5兵1进1兵7进1炮3退1炮2进2炮3平8马4退3炮8平7车8平6士6进5炮2退1兵7进9车2平3车8进2车3退2马7进8车3平2马8退6兵1进1相3进5车2进3马6退8车8进1马8进7车8平4车2进5车4进9车2平3车8进2车3退2马7进8车3平2马8退6兵1进1相3进5车8进1车8进3马1进2马6进8炮3退1马8进6车8平9车2平3车8进2车3退2马7进8车3平2马8退6车2平4马6进8车4平2马8退6车2平6相3进5兵7进1车8进2车8进9车2平3车8进2车3退2相7进5兵7进1马7进8车3平2兵3进1车2平7马8进9炮3退1车8进5炮3平7炮9平7马7退4炮2平1车8平21兵5进1马4退3兵5进1士6进5兵5平6相7进5兵6平7炮2平1车8平5兵3进15车1进1车9进1车3平1马7退9车1平4马5进7兵7进1士4进5兵3进1车2平4炮3进4兵3进1车4进3炮8进1车4进2马3进4兵7进1兵3进1车2平7车4平3车7平6马4进2车6平8炮2平3马7退5车1进1车9平6车1平6车8平6士6进2兵3进1炮8退3马3进4炮8平6炮5平3车2平6车3进1车9平7炮3进5炮6进1炮3平5车6进1炮5平6车6进2炮2进5炮2平7马7进6车1平2炮8平7车4平5马6进4车5平6马4进5相3进5兵3进1炮7平5车2进3马7退5马3进2车6平5炮2平7马7进6车1平2炮8平7车4平5马6进4车5平6马4进5相3进5兵3进1炮7平5兵7进1相5进3车2进3马3退5炮2平7马7进6车1平2炮8平7车4平5兵3进1炮7平1相7进9车5平1炮7进4兵7进1马3进4车1平7车9平6 2车4进7炮8进2兵3进1兵7进1兵3进1车2平7马3进4兵3进1兵1进1马3进4兵1进1马4进6车4退4炮8退4兵1平9炮2进4车9平8车1平2车2平4车2进3兵9进1车4平2马7进9前车进1车4平8车2进4兵9进1兵1进1炮9进3兵3进1车4进5炮8进2车4平3车9进2车1平6兵3进1车6进3炮5平4炮5平6炮4进5炮2平6相7进5相7进5炮8退4车3平进4兵7进1车4平3炮9退2马9进8炮9平7车3平4马1进2炮9进1马2退1炮9退4士6进5炮9平8炮4平3 兵3进1炮7进5兵3平2兵5进1兵2平3兵5进1兵5进1马3进5兵3平4马5进6炮6退1车3平6车8退5车6平5炮6平5马8进7车1平2兵9进1兵5进1兵5进1马3进5兵9进1马7退6兵9平8车2平3车3退4马5进7车9进9 车7进1马5进3车8平7兵3进1车7进1兵3进1车7退5兵7进1炮5平7炮2平4车8进3车7平4士6进5前车进3炮5平3后车进1后炮退1炮1平2前炮进4马6退4相7进5车1平4兵9进1车4进6相7进5车1平4兵9进1车4进6马6进7车8进1车9进1兵5进1车4进2炮2退1炮6进3炮2平6士4进5车4进5车3平6马6进4平9将5平4车8进9将4进1车8退1进2车2退4后车进4车2进2后车平7车8进9前炮进3将5进1马3退2马8进7炮5退2马7进5炮5进3车2平8马2进3马8进7车8进5炮5平7车8进5马8进6车8平4炮7退1兵7进1车7平3车2平4马3退5马7退9车2进2士6进5车9平4兵7平6车4退1车1平4炮5平6炮8进1马6退4马7进6士4进5马2退4炮7平8炮1平4炮8平3车8进4炮5进2相7进5车4进2炮2退1炮6进3炮2平6兵3进1兵3进1车8平7马7进8车6进7车8平1炮5退1士4进5车2平6马7进6马8进6马4进5车2进1炮1平4炮7进7士4进5马3退5马7退9炮5进4士6进5车6进4相3进1马8进7炮2平7士4进5后车进1炮7进7马5退3炮8进5车4平7炮4退3车7平6车4平2车8进1马5退7马8进7马7退5炮3进4兵3进1兵7进1兵9平8车3进5炮8进7马3退23兵7进1车2进2兵3进1兵7进1车7平6炮2平3相7进9马3进2车6平7炮1退2马1进2炮1平3车7平6马9进8炮1进1马8退9炮1退4士4进5炮1平2炮6平7兵7进1炮3进5兵7平8兵5进1兵8平7兵5进1兵5进1马7进5兵7平6马5进4炮4退1车7平4车2退5车4平5炮4平5马2进3车9平8兵1进1兵5进1兵5进1马7进5兵1进1马3退4兵1平2车8平7车7退4马5进3车1进9 车3进1马5进7车2平3兵7进1车3进1兵7进1车3退5兵3进1炮5平3炮8平6车2进3车3平6 士4进5前车进3炮5平7后车进1后炮退1炮9平8前炮进4马4退6相3进5车9平6兵1进1车6进6相3进5车9平6兵1进1车6进6马4进3车2进1车1进1兵5进1车6进2炮8退1炮4进3炮8平4士6进5车6进5车7平4马4进6平9将5平6车2进9将6进1车2退1 进2车8退4后车进4车8进2后车平7车2进9前炮进3将5进1马7退8马2进3炮5退2马3进5炮5进3车8平2马8进7马2进3车2进5炮5平3车2进5马2进4车2平6炮3退1兵3进1车3平7车8平6马7退5马3退1车8进2士4进5车1平6兵3平4车6退1车9平6炮5平4炮2进1马4退6马3进4士6进5马8退6炮3平2炮9平6炮2平7车2进4炮5进2相3进5车6进2炮8退1炮4进3炮8平4兵7进1兵7进1车2平3马3进2车4进7车2平9炮5退1士6进5车8平4马3进4马2进4马6进5车8进1炮9平6炮3进7士6进5马7退5马3退1炮5进4士4进5车4进4相7进9马2进3炮8平3士6进5后车进1炮3进7马5退7炮2进5车6平3炮6退3车3平4车6平8车2进1马5退3马2进3马3退5炮7进4兵7进1兵3进1兵1平2车7进5炮2进7马7退83兵3进1车8进2兵7进1兵3进1车3平4炮8平7相3进1马7进8炮6平5车5进2车8平6炮7退3马9退7马6进8车6平2车5进1马7进5车5平4炮5平4炮7平5士4进5车4平3将5平4车炮4平5车5进2车2平4炮3退3马1退3马4进2车4平8车5进1马3进5车5平6炮5平6炮3平5士6进5车6平7将5平6车5平4车3平1相3进1兵3进1士5进4兵1进1兵1进1炮5平3炮4平7炮3进4马5退7马8退7车2进3兵3平2 5平6车7平9相7进9兵7进1士5进6兵9进1兵9进1炮5平7炮6平3炮7进4马5退3马2退3车8进3兵7平8。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
形组合为一个。
按下“Ctrl”，点击拖动复制，分别在适当 位置上。逐个修改艺术字，完成棋局的制作。
瑞丰国际
教你用 WPS 表格制作象棋棋局
z3b4e 瑞丰国际
最近使用中发觉，wps 表格对特定的制作功能 相当强大，用 wps 表格制作棋盘更可以实现双人对
弈哦 O(∩_∩)O
选定 9 行 8 列，用“边框”工具完成棋纸的基
础制作。小技巧：选定所有要操作的列，或行，然
后只须调整最后面一列或行的高或宽，就可以调整 所有列或行的高度或宽度了。笔者此处选择行高
瑞丰国际
53，列宽 9.5。
将第 5 行合并居中。点击“插入”“”→“艺 术字”，选择一款喜欢的艺术字体输入“楚河汉界”。
（笔者这里选择的是第三行、第四列的艺术字体。）
并且用空格键分开所输入的字。编辑艺术字的色
瑞丰国际
与线条”→“填充”→“颜色”，在下拉列表选择
“无填充颜色”，点击确定。这时圆形将是透明的，
仅有黑色边框。再次点击“椭圆”工具，在原圆形 上绘制一个略小的同心圆。
此时有两个圆形的，点一下“绘图”旁边的小 箭头，此时的鼠标操作将仅选取，用鼠标框选两张， 在上点右键“组合”，将两张组合为一张。点击右
键→“设置对象格式”，选择填充颜色为浅橙色。
瑞丰国际
点击“三维设置”（若在界面找不到，请在界面上
方右键，勾选“三维设置”）。设置三维深度为 15
磅，三维颜色为金色，方向为向下（第一行第二个）。
点击“插入”“”→“艺术字”，选择第三行、
第四列的字体样式，编辑艺术字体，选择隶书，输
入“卒”，字号为 40，颜色为黑色，加粗。适当将 艺术字压扁一点点，使得更为美观。将艺术字与圆
彩、大小等，直到满意，并移动到第 5 行的恰当位 置。
瑞丰国际
选择“绘图”工具（若界面上找不到，请在窗
口上方点击右键，勾选“绘图”），点击“椭圆”，
这时鼠标指针会变为“+”形状，移动“+”，使之 和棋盘中任意一个交叉点完全重合。按下“Ctrl”
和“Shift”不放，拖动鼠标绘制一个棋子大小的
圆形。 在圆形上点击右键→“设置对象格式”“颜色