数学建模社区-数学中国

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

作者: 韩冰    时间: 2004-10-4 12:07
标题: 漫谈VB代码的优化
<FONT color=#fed969 size=4>8 K1 ]% L0 I* j/ N( o
<><FONT color=#f70909>作者;小珂     转自<a href="http://www.hackbase.com/" target="_blank" >黑基</A>bbs<a href="http://hackbase.com/News/hk" target="_blank" >原创</A>作品版
  X0 C% p  s* V/ N; b版权归<a href="http://hackbase.com/hacker" target="_blank" >黑客</A>基地所有, 转载请注明出处</FONT></P>
) S( z( H/ e3 O<>前一日子写了篇替VB喊冤,感到说理没有力度,泛泛空谈,远没有起到喊冤的效果-_-0 q' q$ X, c5 h% \& B" s3 y
所以呢,现在把我以前的VB<a href="http://hackbase.com/hacker" target="_blank" >代码</A>优化的一点小小的<a href="http://hackbase.com/game/jy" target="_blank" >经验</A>总结一下,希望可以给大家带来点帮助,也希望大家能* Q: u9 @5 w8 _3 j" A7 d
把各自的观点补充一下~~+ x" t7 [3 r( x6 Z2 |. i5 ?
第一,偶认为要写出运行速度快的程序,在定义数据类型上要注意一下,
1 }0 L) o6 T9 l9 ~* p8 \2 d5 z比如说Single,Double和Currency这几种数据类型如果可以的话应尽量用Integer或Long 代替,说到这,有位仁兄举手发言了:“那偶要是想数据能够保存小数,怎么能用那2个整型呢?”,别急啊,我下面就想说这个,其实小数也可以保存在Integer类型的变量中。
4 Y. m" W7 f+ l' l例如程序中约定有三位小数,那么只需要将保存在Integer变量中的数值除以1000就可以得到结果。5 V5 o1 e+ u" g( ^# m
根据<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倍。
% N0 C/ ~+ r. G" P# w' a$ O这个可不是吹牛啊~~,不信你也试试?</P>
, `3 w: w3 V  t  }<>第二,要尽量避免使用变体,这个稍微懂点<a href="http://hackbase.com/hacker/program" target="_blank" >编程</A>的估计都能理解,2 t1 t/ i& O- G, n* I5 c! F) G! h. j
变体类型的变量需要16个字节的空间来保存数据" }8 e+ `9 C5 V1 k1 _* F
如果想写出效率高,质量好的程序,就不要偷懒哦~~</P>! q8 k) z* K" y7 S$ N& {
<>第三,  尽量使用数组,避免使用集合,
% D" a) Z1 c3 x4 t9 T5 {能用数组的就不要考虑集合,为什么?
9 {9 z- v- L* r3 o; m9 V9 u在VB中,数组是最高效的数据结构之一。
1 }' [3 K2 b4 _8 d5 W" j! Z自己想想,集合作为一个对象,
+ s- P9 o# k% q其数据的存取速度可能只是数组的百分之一哦4 {# y& a4 q" k4 A( b
,所以说能用数组的千万不要自己去找麻烦~~8 T# e- L6 P5 a% P6 q7 R( e3 z
当你有多个保存类似数据的变量时,也可以考虑将他们用一个数组代替。$ O' T0 {9 [$ t. a# {+ G
另外记着不要使用循环来在数组间进行拷贝工作,
4 U' r5 M2 v. d' U# o" |. m请使用更快的API函数:MemCopy或者RtlMoveMemory</P>2 s8 s2 O6 m( p) a3 ]
<>第四,尽量 不要使用ActiveX控件
6 w# \9 A, E7 ?1 t) n除非ActiveX控件涉及到用户界面,否则尽量使用轻量的对象,
  p! c9 ?/ H% u- h. O0 M  W3 F' c9 Z例如类。这两者之间的效率有很大差异。
8 k/ N% Y' d/ L6 w) ^3 j: N( N如果你设计的ActiveX对象不涉及到用户界面,就使用ActiveX DLL代替控件9 F, ^& O) Z* D6 f/ c% d
在涉及到使用ActiveX控件和DLL的时候,很多程序员喜欢将它们编译好,
1 m8 Q7 g* L- ]- s5 J8 o然后再加入工程中。我建议你最好不要这样做,
" N5 F- n4 ^, X因为从VB连接到一个外部对象需要耗费大量的CPU处理能力。
( w, R6 F7 r/ R0 `: C/ [# u' a每当你调用方法或存取属性的时候,都会浪费大量的系统资源。& R7 p# o& q2 p' A, }& I; |2 f
如果你有ActiveX控件或DLL的源<a href="http://hackbase.com/hacker" target="_blank" >代码</A>,将它们作为工程的私有对象。</P>
8 o5 n# f  \6 _! ?) {3 z<>第五,减少模块的数量/ O$ O+ u3 ^; ~6 u8 M9 K
有些人喜欢将通用的函数保存在模块中,对于这一点我表示赞同。
0 ?; A% {! T( k但是在一个模块中只写上二三十行<a href="http://hackbase.com/hacker" target="_blank" >代码</A>就有些可笑了。
/ B2 Z( S, Q/ N0 a如果你不是非常需要模块,尽量不要使用它。这
. t. Z+ _3 {/ h# E1 u* i样做的原因是因为只有在模块中的函数或变量被调用时,
/ v+ J: T" f7 j0 A; \- f0 m8 [VB才将模块加载到内存中;当VB应用程序退出时,
, q+ O0 A7 k6 x. P才会从内存中卸载这些模块。如果<a href="http://hackbase.com/hacker" target="_blank" >代码</A>中只有一个模块,
, c+ S' P$ v; J9 U5 C+ |1 [+ PVB就只会进行一次加载操作,这样<a href="http://hackbase.com/hacker" target="_blank" >代码</A>的效率就得到了提高;
5 |: K& w2 ?6 ]! j. v. q! R7 d反之如果<a href="http://hackbase.com/hacker" target="_blank" >代码</A>中有多个模块,VB会进行多次加载操作,<a href="http://hackbase.com/hacker" target="_blank" >代码</A>的效率会降低。</P>
) t8 X1 R$ Z$ O, S<>第六,减少图片的使用
$ H( ^. X, E) ~  y" P, @7 K图片将占用大量内存,而且处理图片也需要占用很多CPU资源。
4 z7 v* R4 Z  R1 q% N在<a href="http://down.hackbase.com/" target="_blank" >软件</A>中,如果可能的话,( A+ z( N1 ]* F
可以考虑用背景色来替代图片,这个我常用,呵呵~~</P>
- d; G3 f0 n- U# h* `) K<>第七,其他的一些小<a href="http://hackbase.com/network/network" target="_blank" >技巧</A>  O& g/ `, a- r& w/ t- ]
1,判断字符串是否为空: M1 u$ y1 N! E# H, ]
检查字符串是否为空时一般使用这种方法
8 ]* g5 |7 a5 tIf Text1.Text = "" then
5 C" g1 s6 A3 }! J7 }9 Kend if
* G5 B& \+ I( I1 }" S: A3 E如果使用
. s) d- j% p1 y3 u2 mIf Len(Text1.Text) = 0 then
# Z' V7 u$ B( Q3 p' J) Cend if
; c. @, A, T' x9 |效率会大大提高) G& u  p9 R" P; F0 |
2,多使用With语句引用对象; s( v" Z+ K# Q) _
3,单独定义和分配对象! I6 I, R, B- c! ~/ t6 j" }
定义对象和分配数值可以使用联合语句:Dim obj As New MyClass。但是这要比以下2个单独的语句运行速度慢:0 H/ g& }& }7 E
Dim obj As MyClass & c: W$ t  F" B+ Q" Y! J
Set obj = New MyClass8 Q0 d$ P2 W9 o  I! e2 S7 w3 T
4,使用Move方法
3 j+ n0 i& m7 E. l' v在改变对象的位置时,有些程序员喜欢使用Width,Height,Top和Left属性,如果使用Move方法代替,效率会提高很多" n# z# K8 X' |, w
比如- Z) m, m2 J9 I  Y: Y) a
Image1.Width = 100# l4 Y( N8 ~/ S- s- [3 V
Image1.Height = 100/ l" S  Q8 _3 t4 O; y8 d4 X6 L5 I! q
Image1.Top = 0
1 E$ K4 f5 {2 c- ^  C( ZImage1.Left = 0
$ o) q( ~7 Q4 w就可以使用Image1.Move 0,0,100,100 代替</P>
, R* y5 F: z  A! Y' G<>第八,算法优化! }) y" y. o" N8 O9 c' }) L
尽可能不要使用平方根运算& T6 Z: O( O2 S; N$ Q
实践证明,使用平方根运算将耗费很多的运行时间。/ l3 Y6 O* Z* ^! l- A1 T
比如:宁可使用语句If a * a + b * b = 4 Then ...,+ x7 X. }& d. Q7 `5 P8 k
而不要使用达到同等目的的命令If Sqr(a * a + b * b) = 2 Then ...。</P>
% y9 ]4 U& |2 h$ s0 M5 }- u<>写了一夜了,也就是把自己以前的一点<a href="http://hackbase.com/game/jy" target="_blank" >经验</A>总结一下,当然还有许多方法一时也想不起来了
% r5 c1 S6 c( @1 W) v我会在想到过找到这方面的信息时再继续哦,希望大家也能把自己的相关<a href="http://hackbase.com/game/jy" target="_blank" >经验</A>补充一下
' i/ K4 x+ O. m  K  @另外我写的如果有原则性错误也欢迎大家批评指正,这里先谢谢了~~- d( t4 D9 q, \+ s8 e
我去睡觉了。。。-_-</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