ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 15934|回复: 14

[Excel 程序开发] [第13期] 七巧板

[复制链接]

TA的精华主题

TA的得分主题

发表于 2006-7-2 17:29 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

第一次出题,请大家提出宝贵意见

 

[此贴子已经被作者于2006-7-5 8:48:00编辑过]
单选投票, 共有 55 人参与投票

距结束还有: 3281 天10 小时2 分钟

您所在的用户组没有投票权限

TA的精华主题

TA的得分主题

发表于 2006-7-8 14:01 | 显示全部楼层


评论:

lg_cai兄 执行结果完全正确.。类似 Sub fz1(i, j, m, z) 这样的过程,参数显式定义效果会好一些。

[此贴子已经被northwolves于2006-8-3 11:21:45编辑过]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

TA的精华主题

TA的得分主题

发表于 2006-7-12 16:26 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册


评论:

用兄的计算结果完全正确,代码执行速度也很可观,在我的机子上运行需要2.3秒.

[此贴子已经被northwolves于2006-8-3 11:16:48编辑过]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

TA的精华主题

TA的得分主题

发表于 2006-7-19 21:12 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

VBA我是门外汉,早上刚刚硬着头皮做了清风大师的Listview。下午想想反正献丑一次也是献又何妨多献一次,于是又用最笨重的方法做了狼版主的这道题。自我感觉答案就好像不对劲,但凑个数吧,毕竟是第一次做VBA的题目,呵呵,总要有个开头。

以下是我的答案,不考虑颜色的变化(同一区域两次颜色不同算同一种)。时间紧,没做码放的代码。代码看了想吐可别找我啊[em04]。

 


 评论:

chrisfang 兄的代码执行结果不正确,不能得分。针对本题,穷举不是很好的策略,应该选择用递归解决,可以参考楼上二位的代码。继续努力!!!

[此贴子已经被northwolves于2006-8-3 11:26:54编辑过]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

TA的精华主题

TA的得分主题

 楼主| 发表于 2006-7-30 14:53 | 显示全部楼层

我的答案,比上面两位慢些

 


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

TA的精华主题

TA的得分主题

发表于 2006-8-9 09:16 | 显示全部楼层

说真的.这样的题比较头痛,因为算法占很大份量.象qee的算法非常好,我1G奔3,256M内存,只跑了1.04秒,而lg_cai的程序则跑了30多秒.qee只穷举了答案的1/4,按比例lg_cai的程序也要跑到7.5秒.显见qee的算法功底,我怀疑他是专门的程序员,不象我这个半路出家的,考虑到最后还是放弃了.

还有就是版主上了qee的当,他没用递归.呵呵.刚打开时,习惯地看了模块代码,里面用了递归.他真实的代码是在sheet1里.他对程序做了注释,偏偏算法部分,只字未提,唉..

最后我认为本题其实就是穷举,即使使用递归,它也还是穷举.

TA的精华主题

TA的得分主题

发表于 2006-8-29 16:27 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

期待算法的讲解!

看着题目一点思路都没有!

TA的精华主题

TA的得分主题

发表于 2006-8-31 11:35 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

显示结果部分用了qee用的部分代码

 


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

TA的精华主题

TA的得分主题

发表于 2010-9-27 18:29 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2013-3-14 11:02 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-22 07:26 , Processed in 0.048630 second(s), 16 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表