VB编程之提速攻略
● 尽可能不要使用平方根运算
实践证明，使用平方根运算将耗费很多的运行时间。比如：宁可使用语句If a * a + b * b = 4 Then ...，而不要使用达到同等目的的命令If Sqr(a * a + b * b) = 2
Then ...。
● 用C++或者Delphi重新编写程序
虽然这个建议听起来很罕见，但为了达到更高的速度与性能，恐怕这是最终的解决方案。
● 升级到Visual Basic版本5或者6
本地编译的可执行程序在速度上要比C++或者Delphi慢许多，但是这要比Visual Basic版本4上的非编译程序快很多。
● 剖析应用程序
请使用性能监视器软件精确地了解程序在哪里花费大量的运行时间。Visual Basic版本4和5就自带一个这样的工具，Visual Basic版本6的企业版中也有。不要在运行已经足
够快的代码上耗费时间进行优化。
● 使用非压缩图形文件
设置表单或者图形框上的图形属性为.bmp文件，而不要是压缩的JPEG或者GIF文件。后者是按照压缩格式存放的，程序必须要进行解压缩的工作才能显示它们。
● 预装入表单
当程序启动时，装载所有要使用的表单到内存。这样，当需要使用它们时，就可以很快的显示出来。
● 使用数组代替集合
使用数组操作非常快。只有当需要特殊的功能比如查找关键字时，再使用集合。
● 预分配数组大小
尽可能大的分配好数组的尺寸，这样随后就不需要使用ReDim重新定义它的长度。
● 快速初始化数组
如果需要设置数组的所有项目为0，请使用ReDim命令重新分配大小来达到效果。这虽然会浪费一些空间，但却能大大地提高速度。
● 快速拷贝数组
不要使用循环来在数组间进行拷贝工作，请使用更快的API函数：MemCopy或者RtlMoveMemory。
● 使用明确的数据类型
除非必要，请不要使用Variants数据类型定义变量，而要定义明确的数据类型，比如string、char。
● 单独定义和分配对象
定义对象和分配数值可以使用联合语句：Dim obj As New MyClass。但是这要比以下2个单独的语句运行速度慢：
Dim obj As MyClass
Set obj = New MyClass
● 尽可能地使用整型操作符
比如：为了表示除法运算，请使用，而不是/。
● 尽可能不要使用平方根运算
实践证明，使用平方根运算将耗费很多的运行时间。比如：宁可使用语句If a * a + b * b = 4 Then ...，而不要使用达到同等目的的命令If Sqr(a * a + b * b) = 2
Then ...。
● 用C++或者Delphi重新编写程序
虽然这个建议听起来很罕见，但为了达到更高的速度与性能，恐怕这是最终的解决方案。
● 升级到Visual Basic版本5或者6
本地编译的可执行程序在速度上要比C++或者Delphi慢许多，但是这要比Visual Basic版本4上的非编译程序快很多。
● 剖析应用程序
请使用性能监视器软件精确地了解程序在哪里花费大量的运行时间。Visual Basic版本4和5就自带一个这样的工具，Visual Basic版本6的企业版中也有。不要在运行已经足
够快的代码上耗费时间进行优化。
● 使用非压缩图形文件
设置表单或者图形框上的图形属性为.bmp文件，而不要是压缩的JPEG或者GIF文件。后者是按照压缩格式存放的，程序必须要进行解压缩的工作才能显示它们。
● 预装入表单
当程序启动时，装载所有要使用的表单到内存。这样，当需要使用它们时，就可以很快的显示出来。
● 使用数组代替集合
使用数组操作非常快。只有当需要特殊的功能比如查找关键字时，再使用集合。
● 预分配数组大小
尽可能大的分配好数组的尺寸，这样随后就不需要使用ReDim重新定义它的长度。
● 快速初始化数组
如果需要设置数组的所有项目为0，请使用ReDim命令重新分配大小来达到效果。这虽然会浪费一些空间，但却能大大地提高速度。
● 快速拷贝数组
不要使用循环来在数组间进行拷贝工作，请使用更快的API函数：MemCopy或者RtlMoveMemory。
● 使用明确的数据类型
除非必要，请不要使用Variants数据类型定义变量，而要定义明确的数据类型，比如string、char。
● 单独定义和分配对象
定义对象和分配数值可以使用联合语句：Dim obj As New MyClass。但是这要比以下2个单独的语句运行速度慢：
Dim obj As MyClass
Set obj = New MyClass
● 尽可能地使用整型操作符
比如：为了表示除法运算，请使用，而不是/。