乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 ☆ ☆ ☆ 尊重版权，从我做起，拒绝盗版，拒绝倒卖 ☆ ☆ ☆ 签到、发布资源、邀请好友注册，可以获得银币 ☆ ☆ ☆ 请注意保管好自己的密码，避免账户资金被盗
查看： 137|回复： 9

vba的子程序长度有限制??

[复制链接]
mikewolf2k

85

主题

1175

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1518
发表于 2003-12-31 22:35:00 | 显示全部楼层 |阅读模式
vba中子程序内代码行数有限制吗?
sub a()
    select case
          case 1
               .....
          case 2
              ....
              ....
          case n
               
end sub
现在该sub内有720行,运行时显示"编译错误:过程太大",如果注释掉3行就可以顺利运行,何故?难道sub大小有限制?(acad2000 vba)
回复

使用道具 举报

myfreemind

41

主题

657

帖子

9

银币

中流砥柱

Rank: 25

铜币
821
发表于 2003-12-31 22:39:00 | 显示全部楼层
这个倒没有注意，不过你的这个也太长了吧，呵呵
回复

使用道具 举报

mikewolf2k

85

主题

1175

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1518
发表于 2003-12-31 22:56:00 | 显示全部楼层
不是呀,我有很多图例要画(一个图例平均有10划,就需要30行.),要用时call draw(图例1),然后在sub draw() 中用select case 选择跳到相应的代码画图.
天,我现在连一半的图例都没画完,又不好分成几个sub,这可怎么办??
回复

使用道具 举报

super613

0

主题

9

帖子

5

银币

初来乍到

Rank: 1

铜币
9
发表于 2004-1-1 05:39:00 | 显示全部楼层
天啊~720行!!
我暈了!
回复

使用道具 举报

mikewolf2k

85

主题

1175

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1518
发表于 2004-1-1 10:28:00 | 显示全部楼层
奇怪了,刚才重建了一个sub , 里面有1200行a=a+1,却没有问题,难道是select case 的问题?
回复

使用道具 举报

mikewolf2k

85

主题

1175

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1518
发表于 2004-1-2 19:29:00 | 显示全部楼层
再顶顶,有人遇到过这个问题吗?
回复

使用道具 举报

efan2000

26

主题

589

帖子

10

银币

中流砥柱

Rank: 25

铜币
693
发表于 2004-1-2 21:27:00 | 显示全部楼层
没有吧，谁会写这么长的程序，最好控制在100多行之内，无论维护和调试都比较方便。
回复

使用道具 举报

mikewolf2k

85

主题

1175

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1518
发表于 2004-1-2 21:50:00 | 显示全部楼层

有,就是我.控制不到100多行之内.
有没有碰到过"过程太大"的问题?
回复

使用道具 举报

efan2000

26

主题

589

帖子

10

银币

中流砥柱

Rank: 25

铜币
693
发表于 2004-1-2 22:04:00 | 显示全部楼层
可以减小的啊，比较一个Case语句调用一个过程，代码不是更清晰。
回复

使用道具 举报

mikewolf2k

85

主题

1175

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1518
发表于 2004-1-2 22:18:00 | 显示全部楼层
那就只好过程暴多了
回复

使用道具 举报

返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-15 11:43 , Processed in 0.391490 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表