数学建模社区-数学中国

标题: 漫谈VB代码的优化 [打印本页]

作者: 韩冰    时间: 2004-10-4 12:07
标题: 漫谈VB代码的优化
<FONT color=#fed969 size=4>
0 a" V4 x# V6 m/ e% ]7 z; c/ t* r! p8 E<><FONT color=#f70909>作者;小珂     转自<a href="http://www.hackbase.com/" target="_blank" >黑基</A>bbs<a href="http://hackbase.com/News/hk" target="_blank" >原创</A>作品版
1 C, p2 N7 k/ Y6 S版权归<a href="http://hackbase.com/hacker" target="_blank" >黑客</A>基地所有, 转载请注明出处</FONT></P>3 B& z) f- Y0 o5 p' N! ^
<>前一日子写了篇替VB喊冤,感到说理没有力度,泛泛空谈,远没有起到喊冤的效果-_-1 i3 G' w( h- v1 g
所以呢,现在把我以前的VB<a href="http://hackbase.com/hacker" target="_blank" >代码</A>优化的一点小小的<a href="http://hackbase.com/game/jy" target="_blank" >经验</A>总结一下,希望可以给大家带来点帮助,也希望大家能
+ I+ I& @1 F) E把各自的观点补充一下~~
) ?) h0 |/ j3 W第一,偶认为要写出运行速度快的程序,在定义数据类型上要注意一下,% ?4 q; x; o% V+ I/ {
比如说Single,Double和Currency这几种数据类型如果可以的话应尽量用Integer或Long 代替,说到这,有位仁兄举手发言了:“那偶要是想数据能够保存小数,怎么能用那2个整型呢?”,别急啊,我下面就想说这个,其实小数也可以保存在Integer类型的变量中。
# v1 d4 P' q+ w$ A, K例如程序中约定有三位小数,那么只需要将保存在Integer变量中的数值除以1000就可以得到结果。
+ P9 e' A, b8 Z根据<a href="http://hackbase.com/game/jy" target="_blank" >经验</A>,使用Integer和Long替代Single,Double和Currency后,<a href="http://hackbase.com/hacker" target="_blank" >代码</A>的运行速度可以提高将近10倍。
2 W, s; s4 e# T8 E2 h这个可不是吹牛啊~~,不信你也试试?</P>
3 n! b' e4 ?3 W" V7 [<>第二,要尽量避免使用变体,这个稍微懂点<a href="http://hackbase.com/hacker/program" target="_blank" >编程</A>的估计都能理解,
5 I3 @) h+ a: d9 U变体类型的变量需要16个字节的空间来保存数据
0 M! e; x4 K7 C2 D8 L& v如果想写出效率高,质量好的程序,就不要偷懒哦~~</P>/ {" P/ f# N. d; }
<>第三,  尽量使用数组,避免使用集合,# |* e9 K3 b  x" b8 }/ X* F( r
能用数组的就不要考虑集合,为什么?* k% W2 w& A2 G1 i* L
在VB中,数组是最高效的数据结构之一。+ e2 K1 y1 w1 |' ?% H
自己想想,集合作为一个对象,
9 a8 I0 l$ R1 a其数据的存取速度可能只是数组的百分之一哦
5 ~9 ?( s* X' B  k  M,所以说能用数组的千万不要自己去找麻烦~~) q1 K7 b4 p# I* F( U- d3 ]. q! ]6 o2 Q4 u
当你有多个保存类似数据的变量时,也可以考虑将他们用一个数组代替。
& Z9 z$ k8 Y( u另外记着不要使用循环来在数组间进行拷贝工作,  i/ S% u8 V7 v9 y1 Z, K: R; X
请使用更快的API函数:MemCopy或者RtlMoveMemory</P>% C4 O: [# l) R( g2 N0 o
<>第四,尽量 不要使用ActiveX控件+ v% }9 Y9 O- T) `/ {/ t( ~6 n
除非ActiveX控件涉及到用户界面,否则尽量使用轻量的对象,
% S' v1 z* u2 I& w, B* n3 P, ^例如类。这两者之间的效率有很大差异。
3 V* l( {% \) q2 y. v1 F* n如果你设计的ActiveX对象不涉及到用户界面,就使用ActiveX DLL代替控件: T- `: K( ]) i/ R! ]9 _' N
在涉及到使用ActiveX控件和DLL的时候,很多程序员喜欢将它们编译好," p1 ]7 Z& H7 A. d# d7 c3 a4 _
然后再加入工程中。我建议你最好不要这样做,& e) x; S8 ~: s
因为从VB连接到一个外部对象需要耗费大量的CPU处理能力。, q2 l8 v6 ]( c5 S& u
每当你调用方法或存取属性的时候,都会浪费大量的系统资源。
3 L3 n2 [& c; r7 N) M如果你有ActiveX控件或DLL的源<a href="http://hackbase.com/hacker" target="_blank" >代码</A>,将它们作为工程的私有对象。</P>
6 m7 K0 W7 ^& `& G3 F$ E<>第五,减少模块的数量
- D& n8 H4 O& X: L有些人喜欢将通用的函数保存在模块中,对于这一点我表示赞同。
7 d6 ?% s: E: y7 f* W+ P但是在一个模块中只写上二三十行<a href="http://hackbase.com/hacker" target="_blank" >代码</A>就有些可笑了。6 @; B/ y7 R& q( F3 L( z* H; C. ~
如果你不是非常需要模块,尽量不要使用它。这
" h* C* t( o/ r/ Y! I# Q6 ]: q样做的原因是因为只有在模块中的函数或变量被调用时,
* G2 P8 H9 z+ _* _! j  l, FVB才将模块加载到内存中;当VB应用程序退出时,
, j$ \8 f$ F  Y% [: h才会从内存中卸载这些模块。如果<a href="http://hackbase.com/hacker" target="_blank" >代码</A>中只有一个模块,$ o2 Z- q3 b! ^7 A: k
VB就只会进行一次加载操作,这样<a href="http://hackbase.com/hacker" target="_blank" >代码</A>的效率就得到了提高;& H# F, I( l% ^. g5 D  r
反之如果<a href="http://hackbase.com/hacker" target="_blank" >代码</A>中有多个模块,VB会进行多次加载操作,<a href="http://hackbase.com/hacker" target="_blank" >代码</A>的效率会降低。</P>
5 S0 k* s4 U9 o8 v* U4 C<>第六,减少图片的使用
8 ?# h4 B5 v) W0 g6 L9 Z图片将占用大量内存,而且处理图片也需要占用很多CPU资源。4 I& ~2 _9 G4 h! U! d7 P
在<a href="http://down.hackbase.com/" target="_blank" >软件</A>中,如果可能的话,3 S* a5 M  t" O4 C4 U
可以考虑用背景色来替代图片,这个我常用,呵呵~~</P>
' D! |( \, R' j: f3 _6 C1 B<>第七,其他的一些小<a href="http://hackbase.com/network/network" target="_blank" >技巧</A>! i9 L/ Y0 O$ O( `. ~: w& ~8 H
1,判断字符串是否为空) W3 j% v' Y5 b  `& q
检查字符串是否为空时一般使用这种方法9 z' X# M0 o/ M* W
If Text1.Text = "" then
: t& N# h8 v+ D4 Y, v. rend if
) A" c9 r& B5 N" P" ^1 X& t- o如果使用* H- h0 {9 _; s# J: I3 B$ n: H- V1 d3 i
If Len(Text1.Text) = 0 then
6 m) M; Q6 i5 `+ E8 X" C- w; xend if , M: G! m4 I/ j
效率会大大提高+ m' z4 j0 T* s; g; n
2,多使用With语句引用对象; m4 H4 e3 P! z) p& F; O
3,单独定义和分配对象
  J$ c# I; w6 P/ O定义对象和分配数值可以使用联合语句:Dim obj As New MyClass。但是这要比以下2个单独的语句运行速度慢:
+ w7 I9 C7 D9 d( x" ]$ V# Y8 `% lDim obj As MyClass : D1 S% U  H! S/ W. c0 z1 @
Set obj = New MyClass0 Y5 w% Y# m: {2 [' d* p% j
4,使用Move方法  ~& z  _7 B: T  h! X
在改变对象的位置时,有些程序员喜欢使用Width,Height,Top和Left属性,如果使用Move方法代替,效率会提高很多
* ^' V- T  B1 W比如) J' f; q, Q* B& l; U  M; `
Image1.Width = 100
. h0 _' p8 p0 ?4 O) JImage1.Height = 100
& o, p2 z1 K1 y* l7 r: t. lImage1.Top = 0
; l5 ^% ?. B8 LImage1.Left = 0
( s3 v0 w( P7 ]! X; I# A就可以使用Image1.Move 0,0,100,100 代替</P>7 d- k8 b5 f' o3 b  V! ^
<>第八,算法优化
; q7 G7 m: M3 S) S1 k尽可能不要使用平方根运算
- ]7 h  K/ V& g8 i! Y% P7 X实践证明,使用平方根运算将耗费很多的运行时间。8 h8 w. v2 U# G6 t! `5 L! k- N
比如:宁可使用语句If a * a + b * b = 4 Then ...,
9 c/ h4 m& y" W6 q& n% y而不要使用达到同等目的的命令If Sqr(a * a + b * b) = 2 Then ...。</P>
+ F- l/ K; i0 L. [2 T<>写了一夜了,也就是把自己以前的一点<a href="http://hackbase.com/game/jy" target="_blank" >经验</A>总结一下,当然还有许多方法一时也想不起来了' t1 A! i% _  _. y
我会在想到过找到这方面的信息时再继续哦,希望大家也能把自己的相关<a href="http://hackbase.com/game/jy" target="_blank" >经验</A>补充一下$ j3 G7 L0 P0 I2 P# E" ?- ^
另外我写的如果有原则性错误也欢迎大家批评指正,这里先谢谢了~~
) d( g* N6 t5 P) d) f, L( L我去睡觉了。。。-_-</P></FONT>
作者: xShandow    时间: 2004-10-8 16:23
<>我个人觉得VB代码的整体结构性并不是很紧凑。有些时候甚至表现为语法的不严格。</P>
作者: ggyang    时间: 2009-12-7 21:40
多谢分享,很多问题还没遇到!!!!!




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5