最新更新主题

月度关注热点

【无极作品】VBA 3d动画演示

字体: 小 中 大 | 打印 发表于: 2008-6-02 09:19 作者: 无极 来源: 扑奔PPT网

把这个作品献给扑奔和支持扑奔的所有朋友们！本例演示了VBA 在3D方面强大的功能。由于昨晚入梦太晚，今天真有点睡眼迷离。
单位的死机不支持3D，贴不图了。
感兴趣看看吧！

VBA 3d动画演示.rar
(2008-06-02 09:19:41, Size: 38.6 KB, Downloads: 351)


我也来说两句 查看全部回复

最新回复

  • pants (2008-6-02 09:24:17)

    谢谢！终于坐上沙发了，很美的！

  • rixin2008 (2008-6-02 09:31:37)

    看不了是什么问题？求楼主解决！

  • 爱ppt的牛 (2008-6-02 09:41:57)

    看不到。我已经启动宏了，安全性也降低了。郁闷。

  • pants (2008-6-02 09:42:28)

    我也看不了，

  • 皇城根下 (2008-6-02 09:57:43)

    我也看不了。不知道是怎么回事。打开还要密码

  • 无极 (2008-6-02 10:09:10)

    因为用到了DX，如果看不了就需要检查你的电脑是否支持3D，是否安装了DirectX 8.0及以上版本。否则是看不到效果的，例如我现在正使用的单位电脑就是这样，所以就贴不上图！

    无极写这个东西，不是为了别出心裁，只是想告诉那些对PPT存在偏见的朋友，PPT本身有局限性，每个软件都有它的局限性，但PPT有VBA可以无限弥补它的不足，其他软件未必有，虽然Flash有AS语言，但没有学过算法朋友，想写出炫人效果的代码，几乎是不可能的。学习VBA并以此为起点，进而学习VBS，JS，VB，Dephi甚至VC都提供了坚实的基础。

    代码来源于我三年前学习DX时所写的一个VB示例（记不清是我的还是别人，就当是我的吧），昨天把它移植到了VBA中，感觉效果不错，就发上来作为礼物送给扑奔和扑奔上的朋友们。

    看不到效果的朋友，对不起了，别怪我，不是我的错。

  • Xiao_0 (2008-6-02 10:43:49)

    我的机器有DX9.0，可还是看不到呀。
    提示如图


    1.jpg

  • 无极 (2008-6-02 10:49:23)

    看来问题还不小，我把密码公布了吧！懂VBA的朋友自己调试一下。
    密码：无极之风

    给大家添麻烦了，无极深感歉意。

  • 爱ppt的牛 (2008-6-02 11:04:06)

    没事的，大家都会理解的，谢谢你的作品。用VB经常会出现这些问题的。

  • 无极 (2008-6-02 14:00:50)

    刚有时间检查了一下，竟然是我犯了个低级错误。实在对不起大家。
    代码中用到了一个微软控件：Ietimer，这是一个定时器，原本在移植的时候想到用API函数SetTimer和StopTimer和回调函数TimerPro，但考虑到兼容PPT07（因为它不支持回调），所以才决定用微软的这个控件。
    可能大多数的朋友的系统中都没有安装这个控件。
    下面把控件包发布在下面，把文件解压缩，然后点击“注册”文件即可。如果你的系统目录不是默认为c:\windows\，请自行修改注册文件中的路径。

    ietimer控件.rar
    (2008-06-02 14:01:26, Size: 30.4 KB, Downloads: 24)

  • amwyq (2008-6-02 14:52:06)

    看到一个窗体，没有别的。。。。

  • 无极 (2008-6-02 15:22:41)

    密码我已经公布了，你自己调试一下。

  • thpatty (2008-6-02 17:27:37)

    谢谢分享啊。多谢。

  • dragonlcy (2008-6-03 21:26:49)

    首先谢谢无极的分享,但我这还是看不到.


    QQ截图未命名.JPG

  • wososowo (2008-6-03 23:22:47)

    哈哈，楼主的文件总共才不到40k,，还害得这帮小鬼瞎忙活一通。
    3d能那么小吗？

  • 无极 (2008-6-04 08:09:53)

    出现这样的提示，可能你的系统安装的目录不是在C:\windows\，你可以自己修改批处理中的目录。

  • 无极 (2008-6-04 08:13:24)

    也难怪你怀疑了，不怪你的，出现了这么多的问题。看来回去把代码再重新写一写，换掉那个该死的控件吧，改用API算了，不过改后不支持PPT07。

  • netcfg (2008-6-05 02:15:56)

    不错不错。好东东啊

  • bigyoung (2008-6-12 11:39:25)

    支持,谢楼主

  • busy99 (2008-7-01 18:44:18)

    楼主一番好意，可惜我看不见，解释半天也没看明白，看来差距还是太大阿
查看全部回复 我也来说两句

赞助商链接

最新评论