VB动态添加执行代码完整版(三)

分类： Visual Basic 2010-08-14 03:16 1214人阅读评论(2) 收藏举报

我们演示一个函数,功能是让程序标题实现打字效果!

类模块提供一个强悍的延迟函数,既不会像Sleep哪样使线程暂停二卡卡,

也不会像Timer函数那样CPU使用率飙升到100%(会较大幅度飙升,但是不会在23:59:59这种临界时间延迟出错)

逐行脚本中使用ObjectTemplate.Delay 毫秒数再函数中可以直接Delay

为了节省CPU,于是就用了更强悍的方法:绑定过程给Timer控件!

Script文件夹下的Print.exc 是预处理和绑定

用编译Script文件夹下的PrintCaption.vbs 运行DelayText过程可以实现Delay方法的延迟(即打字效果)

然而Delay终究还是用了较多的CPU,为了使延迟起来没什么感觉,我们来看一个比牛C更牛的方法

绑定过程给Timer控件!

为了简洁我把数组注释掉了,只用了一个Timer(先发下脚本的代码)

这里包括了上面发的DelayText函数,不管那么多了(夜深了还有其他事要做)

输入Print或者Print.exc直接点加载就看到效果了

注:这里的按钮啊什么的文本都是再脚本里设置的还有控件的大小位置都可以设置

刚才 ComboBox的长度遮盖了 Sub复选框主要是为了不影响 Function的说明

暂时就说这么多,置于更牛的功能(牛A),感染Exe啊什么卵都能做,就看你的脚本怎么写!!!!!!!!!!!!!!!!!!!!!!!

本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。