VB在内部使用最简单、最可能的数据类型保存符号数值，这意味着最通常的数字类型－比如0或者1－都按照Integer类型存储。如果在浮点表达式中使用这些常量，可以通过常量的合适类型来加速程序运行，就象下面的代码： value# = value# 1#. 这个语句强迫编译器按照Double格...

2008-02-23 06:40:09

OptionButton控件经常是作为控件数组存在的，要快速找到其中的哪一个被选中，可以使用下面的代码： '假设控件数组包含3个OptionButton控件 intSelected = Option(0).Value * 0 - Option(1).Value * 1 - Option(2).Value * 2 注意，因为第一个操作数总是0，所以上述代码...

2008-02-23 06:40:09

附加文本到TextBox或者RichTextBox控件的通常方法是在当前内容上连接上新的字符串： Text1.Text = Text1.Text newString 但还有一个更快的方法，并且会减少连接操作的闪烁感，代码如下： Text1.SelStart = Len(Text1.Text) Text1.SelText = newString 上一篇： 创建新...

2008-02-23 06:40:07

可以采用“旁门左道”的方式使用Instr函数实现代码的简练。下面是一个典型的例子，检测字符串中是否包含一个元音字母： 1、普通的方法： If UCase$(char) = "A" Or UCase$(char) = "E" Or UCase$(char) = "I" Or UCase$(char) = "O" Or UCase$(char) = "U" Then ' it is...

2008-02-23 06:40:08

如果没有用As语句声明变量，默认类型就是Variants，比如： Dim name ' this is a variant 或者，当前模块下没有声明Option Explicit语句时，任何变量都是Variants类型。 许多开发者，特别是那些先前是C程序员的人，都会深信下面的语句将声明2个Interger类型变量： Dim x...

2008-02-23 06:40:05

很多程序员都没有认识到“在函数本身中使用函数名”的妙处，这就象对待一个局部变量一样。应用这个技巧可以起到临时变量的作用，有时还能加速程序运行。看看下面的代码： Function Max(arr() As Long) As Long Dim res As Long, i As Long res = arr(LBound(arr)) For i...

2008-02-23 06:40:05

删除集合中的所有内容有许多方法，其中有些非常得迅速。来看看一个包含10,000个项目的集合： Dim col As New Collection, i As Long For i = 1 To 10000 col.Add i, CStr(i) Next 可以从末尾位置为起点删除集合内容，如下： For i = col.Count To 1 Step -1 col.Remove...

2008-02-23 06:40:03

大家都知道，操作符的执行速度是相当慢的，特别是处理长字符串时。当必须重复地在同一变量上附加字符时，有一个基于Mid$命令的技巧可以使用。基本思路就是：预留一个足够长的空间存放操作的结果。下面是应用这个技术的一个例子。 假设要建立一个字符串，它要附加从1开始...

2008-02-23 06:40:02

来自微软的资料鼓吹：高级优化对话框中的所有编译选项都被认为是不稳定的，它们可能导致不正确的结果，甚至程序崩溃。对于其中的大多数，这种说法是正确的，但是经常有一个叫做"Allow Unrounded Floating Point Operations"的选项能够给予正确的结果，防止应用程序产生b...

2008-02-23 06:40:01

清除动态数组的最快方法是使用ReDim，清除静态数组则是使用删除。但是如果只想清除数组的一部分内容，怎么办呢？看上去似乎只能使用For-Next循环了。 如果处理的是数字数组，有一个较快的方法。它基于ZeroMemory API函数，正如函数名所示，它能将一块内存区域填充为0。...

2008-02-23 06:40:00