用VBA玩中国象棋(一)：画棋盘

woaishuijia · 发表于 2008-9-20 11:19:46

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

您需要登录才可以下载或查看，没有帐号？注册

x

本系列练习拟通过用VBA方法在CAD的模型空间画棋盘、画棋子、在棋盘上摆放棋子、用鼠标选择并移动棋子、吃对方棋子、用规则限制棋子移动等过程，帮助初学者在游戏中了解和掌握CAD中VBA的基本使用方法。
本帖着重讨论棋盘的画法。通过画棋盘，了解画直线、复制、移动、镜像、阵列等方法。
棋盘的基本尺寸和位置要求见图。参加讨论的朋友也可以按自己的爱好在棋盘上添加图案、文字装饰。
附件中是VBA例程，供参考

mimimao383 · 发表于 2008-9-21 19:08:07

确数阳春白雪类。

joy4205 · 发表于 2008-9-22 17:07:14

很不错，不过我运行后出现这样的状况？搂主给点提示。谢谢先

woaishuijia · 发表于 2008-9-22 18:33:46

把程序中三行下面的代码
.Regen acActiveViewport
改成
.Application.Update

yuanye661 · 发表于 2008-9-26 09:15:50

我可要下载学学，谢谢分享~

yuanye661 · 发表于 2008-9-26 09:16:32

原帖由 mimimao383 于 2008-9-21 19:08 发表 http://www.3dportal.cn/discuz/images/common/back.gif
) m, z+ E$ U; t) S8 _5 i' u确数阳春白雪类。

一看你就是乱回复的吧.

baby008 · 发表于 2010-11-30 17:32:17

怎么用啊老师

hhjxczh · 发表于 2011-9-25 13:26:18

真的有很大的收获，对练习VBA入门有很大的帮助

		自动登录	找回密码
密码			注册

全站		goto3d 说: 此次SW竞赛获奖名单公布如下，抱歉晚了，版主最近太忙：一等奖：塔山817；二等奖：a9041、飞鱼；三等奖：wx_dfA5IKla、xwj960414、bzlgl、hklecon；请以上各位和版主联系，领取奖金！！！	2022-03-11
系统		[系统通知] 平台第一个项目外包——项目拼多；正式上线，欢迎各单位个人有外包、设计、采购、加工需求的，在此寻找更牛的解决方案	2021-07-01

通知

[讨论] 用VBA玩中国象棋(一)：画棋盘

马上注册，结识高手，享用更多资源，轻松玩转三维网社区。

评分

回复 3# joy4205 的帖子