- Rongsen.Com.Cn 版权所有 2008-2010 京ICP备08007000号 京公海网安备11010802026356号 朝阳网安编号:110105199号
- 北京黑客防线网安工作室-黑客防线网安服务器维护基地为您提供专业的
服务器维护
,企业网站维护
,网站维护
服务 - （建议采用1024×768分辨率，以达到最佳视觉效果） Powered by 黑客防线网安 ©2009-2010 www.rongsen.com.cn
VB“超频”秘籍之隐藏的Variant变量
作者：黑客防线网安VB教程基地 来源：黑客防线网安VB教程基地 浏览次数：0 |
黑客防线网安网讯：火眼识破隐藏的Variant变量 如果没有用As语句声明变量，默认类型就是Variants，比如： ->Dimname'thisisavariant-> 或者，当前模块下没有声明OptionExplicit语句时，任...
火眼识破隐藏的Variant变量
如果没有用As语句声明变量，默认类型就是Variants，比如：
->Dimname'thisisavariant->
或者，当前模块下没有声明OptionExplicit语句时，任何变量都是Variants类型。
许多开发者，特别是那些先前是C程序员的人，都会深信下面的语句将声明2个Interger类型变量：
->Dimx,yAsInteger->
而实际上，x被声明为了variant类型。由于variant类型变量要比Integer类型慢很多，所以要特别注意这种情况。正确的一行声明方法是：
->DimxAsInteger,yAsInteger->
GoSub在编译程序中速度变慢
编译为本地代码的VB应用程序中，如果使用GoSubs命令，就会比通常的Subs或者Function调用慢5-6倍；相反，如果是p-code模式，就会相当快。减少DoEvents语句的数量
不要在代码中放置不必要的DoEvents语句，尤其是在时间要求高的循环中。遵循这个原则，至少能在循环中的每N次反复时才执行DoEvents语句，从而增强效率。比如使用下面的语句：
->If(loopNdxMod10)=0ThenDoEvents->
如果只是使用DoEvents来屏蔽鼠标以及键盘操作，那么就可以在事件队列中存在待处理项目时调用它。通过API函数GetInputState来检查这个条件的发生：
->DeclareFunctionGetInputStateLib"user32"Alias"GetInputState"()AsLong
为常量定义合适的类型
VB在内部使用最简单、最可能的数据类型保存符号数值，这意味着最通常的数字类型－比如0或者1－都按照Integer类型存储。如果在浮点表达式中使用这些常量，可以通过常量的合适类型来加速程序运行，就象下面的代码：
->value#=value# 1#.->
这个语句强迫编译器按照Double格式存储常量，这样就省却了运行时的隐含转换工作。还有另外的一种处理方法就是：在常量声明时就进行相应类型的定义，代码如下：
->ConstONEAsDouble=1->
And、Or和Xor：让我们来优化表达式
要检测一个整数值的最高有效位是否有数值，通常要使用如下的代码（有二种情况：第一组If判断表明对Integer类型，第二组对Long类型）：
->IfintValueAnd&H8000Then
但由于所有的VB变量都是有符号的，因此，最高有效位也是符号位，不管处理什么类型的数值，通过下面的代码就可以实现检测目的：
->IfanyValue<0Then
另外，要检测2个或者更多个数值的符号，只需要通过一个Bit位与符号位的简单表达式就可以完成。下面是应用这个技术的几段具体代码：
1、判断X和Y是否为同符号数值：
->If(x<0Andy<0)Or(x>=0Andy>=0)Then...
2、判断X、Y和Z是否都为正数
->Ifx>=0Andy>=0Andz>=0Then...
3、判断X、Y和Z是否都为负数
->Ifx<0Andy<0Andz<0Then...
4、判断X、Y和Z是否都为0
->Ifx=0Andy=0Andz=0Then...
5、判断X、Y和Z是否都不为0
->Ifx=0Andy=0Andz=0Then...
要使用这些来简单化一个复杂的表达式，必须要完全理解boolean型的操作原理。比如，你可能会认为下面的2行代码在功能上是一致的：
->Ifx<>0Andy<>0Then
然而我们可以轻易地证明他们是不同的，比如X＝3（二进制＝0011），Y＝4（二进制＝0100）。不过没有关系，遇到这种情况时，我们可以对上面的代码进行局部优化，就能实现目的。代码如下：
->If(x<>0)AndyThen...->
->
如果没有用As语句声明变量，默认类型就是Variants，比如：
或者，当前模块下没有声明OptionExplicit语句时，任何变量都是Variants类型。
许多开发者，特别是那些先前是C程序员的人，都会深信下面的语句将声明2个Interger类型变量：
而实际上，x被声明为了variant类型。由于variant类型变量要比Integer类型慢很多，所以要特别注意这种情况。正确的一行声明方法是：
GoSub在编译程序中速度变慢
编译为本地代码的VB应用程序中，如果使用GoSubs命令，就会比通常的Subs或者Function调用慢5-6倍；相反，如果是p-code模式，就会相当快。减少DoEvents语句的数量
不要在代码中放置不必要的DoEvents语句，尤其是在时间要求高的循环中。遵循这个原则，至少能在循环中的每N次反复时才执行DoEvents语句，从而增强效率。比如使用下面的语句：
如果只是使用DoEvents来屏蔽鼠标以及键盘操作，那么就可以在事件队列中存在待处理项目时调用它。通过API函数GetInputState来检查这个条件的发生：
为常量定义合适的类型
VB在内部使用最简单、最可能的数据类型保存符号数值，这意味着最通常的数字类型－比如0或者1－都按照Integer类型存储。如果在浮点表达式中使用这些常量，可以通过常量的合适类型来加速程序运行，就象下面的代码：
这个语句强迫编译器按照Double格式存储常量，这样就省却了运行时的隐含转换工作。还有另外的一种处理方法就是：在常量声明时就进行相应类型的定义，代码如下：
And、Or和Xor：让我们来优化表达式
要检测一个整数值的最高有效位是否有数值，通常要使用如下的代码（有二种情况：第一组If判断表明对Integer类型，第二组对Long类型）：
但由于所有的VB变量都是有符号的，因此，最高有效位也是符号位，不管处理什么类型的数值，通过下面的代码就可以实现检测目的：
另外，要检测2个或者更多个数值的符号，只需要通过一个Bit位与符号位的简单表达式就可以完成。下面是应用这个技术的几段具体代码：
1、判断X和Y是否为同符号数值：
2、判断X、Y和Z是否都为正数
3、判断X、Y和Z是否都为负数
4、判断X、Y和Z是否都为0
5、判断X、Y和Z是否都不为0
要使用这些来简单化一个复杂的表达式，必须要完全理解boolean型的操作原理。比如，你可能会认为下面的2行代码在功能上是一致的：
然而我们可以轻易地证明他们是不同的，比如X＝3（二进制＝0011），Y＝4（二进制＝0100）。不过没有关系，遇到这种情况时，我们可以对上面的代码进行局部优化，就能实现目的。代码如下：
黑客防线网安服务器维护方案本篇连接：http://www.rongsen.com.cn/show-14632-1.html
新闻栏目
| 我要申请本站：N点 | 黑客防线官网 | |
| 专业服务器维护及网站维护手工安全搭建环境，网站安全加固服务。黑客防线网安服务器维护基地招商进行中！QQ:29769479 |