Access交流网
  • 设为首页|收藏本站|繁体中文|手机版
  •     
  • Access培训-Access开发平台-Access行业开发

  • 首页
  • 资讯
  • 技巧
  • 源码
  • 行业
  • 资源
  • 活动
  • 关于

技巧

ACCESS数据库

启动/设置/选项/背景

修复/压缩

安全/加密/解密

快捷键

版本升级/其它等

数据表

命名方式/设计规范

表设计

查询

Sql语言基础

选择查询

更新查询

删除查询

追加查询

生成表查询

交叉表查询

SQL特定查询

查询参数

查询综合应用

界面/窗体/控件

标签

文本框

命令按钮

组合框/列表框

选项组/复选框/选项按钮

选项卡

子窗体

窗体本身/综合应用

其它

报表打印

报表设计

高级报表

模块/函数/VBA/API/系统

VBA基础

内置函数

调试/跟踪/Debug

模块/类模块

API/COM/系统相关

字符数字日期

网络通信游戏

加密解密安全

文件处理

经典算法

宏/菜单/工具栏/功能区

宏/脚本

菜单/工具栏

功能区/Ribbon

图表/图形/图像/多媒体

图表

图形/图像

音频

视频/动画

DAO/链接表/ADO/ADP

DAO/链接表/ODBC

ADO/RDO

ADP

ActiveX/第三方控件/插件

Treeview树控件

ListView列表控件

Toolbar工具栏控件

微软其它控件

Dbi-Tech

CodeJock

Grid++Report

FastReport

ComponentOne

加载项/插件/Addin

OFFICE集成/导入导出/交互

Excel导入导出/交互

Word导入导出/交互

PPT交互

Outlook控制/邮件

Text文本文件/INI/CSV

PDF/SWF/XML格式

CAD格式

Sharepoint/其它Office

SqlServer/其它数据库

表

视图

存储过程/触发器

函数

用户/权限/安全

调试/维护

SqlServer其它/综合

发布/打包/文档/帮助

开发版/运行时

打包/发布/部署

开发文档/帮助制作

Access完整行业系统

采购管理系统

销售管理系统

仓库管理系统

人力资源管理HRM

CRM管理系统

MRP/ERP管理系统

BRP/流程优化

其它管理系统

心得/经验/绝招
其它/杂项
Excel技巧

Excel应用与操作

Excel开发编程

Word技巧

Word应用与操作

Word开发编程

Outlook技巧

Outlook应用与操作

Outlook开发编程

热门文章

  • Access 2003开发..
  • 抄Access窗体的技巧
  • UTF-8 and Unicode FAQ
  • UTF-8编码研究
  • Access数据库设计技巧..
  • 取得物料清单列表中某个物料..

最新文章

  • Access数据库设计技巧..
  • Access数据库设计技巧..
  • Access数据库设计技巧..
  • Access数据库设计技巧..
  • Access数据库设计技巧..
  • 使用Access和Exce..

联系方式

Access交流网(免费Access交流)

QQ:18449932 

网  址:www.access-cn.com

当前位置:首页 > 技巧 > 心得/经验/绝招
心得/经验/绝招

Access七种提高代码的运行速度的技巧

本文描述了如何通过一些技术手段来提高编程代码的执行效率。
  
1. 使用整数(Integer)和长整数(Long)
    提高代码运行速度最简单的方法莫过于使用正确的数据类型了。也许你不相信,但是正确地选择数据类型可以大幅度提升代码的性能。
       在大多数情况下,程序员可以将Single,Double和Currency类型的变量替换为Integer或Long类型的变量,因为VB处理Integer和Long的能力远远高于处理其它几种数据类型。
       下面是排序: Long 最快 Integer . Byte . Single . Double . Currency 最慢
     在大多数情况下,程序员选择使用Single或Double的原因是因为它们能够保存小数。但是小数也可以保存在Integer类型的变量中。例如程序中约定有三位小数,那么只需要将保存在Integer变量中的数值除以1000就可以得到结果。根据我的经验,使用Integer和Long替代Single,Double和Currency后,代码的运行速度可以提高将近10倍。   

2. 避免使用变体 
  对于一个VB程序员来说,这是再明显不过的事情了。变体类型的变量需要16个字节的空间来保存数据,而一个整数(Integer)只需要2个字节。通常使用变体类型的目的是为了减少设计的工作量和代码量,也有的程序员图个省事而使用它。但是如果一个软件经过了严格设计和按照规范编码的话,完全可以避免使用变体类型。
  在这里顺带提一句,对于Object对象也存在同样的问题。请看下面的代码:
       Dim FSO
       Set FSO = New FileSystemObject
  或
       Dim FSO as object
       Set FSO = New FileSystemObject
  上面的代码由于在申明的时候没有指定数据类型,在赋值时将浪费内存和CPU时间。
       正确的代码应该象下面这样: Dim FSO as New FileSystemObject   

3. 尽量避免使用属性
  在平时的代码中,最常见的比较低效的代码就是在可以使用变量的情况下,反复使用属性(Property),尤其是在循环中。
       要知道存取变量的速度是存取属性的速度的20倍左右。下面这段代码是很多程序员在程序中会使用到的:
        Dim intCon as Integer
        For intCon = 0 to Ubound(SomVar())
              Text1= Text1& vbcrlf & SomeVar(intCon)
        Next intCon
  下面这段代码的执行速度是上面代码的20倍。
        Dim intCon as Integer
        Dim sOutput as String
        For intCon = 0 to Ubound(SomeVar())
              sOutput = sOutput & vbCrlf & SomeVar(intCon)
        Next
        Text1= sOutput
        同样地,像这样的代码 . . .
         Do Until EOF(F)

               Line Input #F, nextLine
               Text1= Text1+ nextLine
          Loop . . . 比下面的代码慢得多:
          Do Until EOF(F)

                 Line Input #F, nextLine
                 bufferVar = bufferVar + nextLine
          Loop Text1= bufferVar
          然而,下面的代码完成了相同的功能,而且还要快: Text1= Input(F, LOF(F))
          如上述,几种方法都实现了同样的任务;同时,最好的算法也是最优的。   

4. 尽量使用数组,避免使用集合
   除非你必须使用集合(Collection),否则你应该尽量使用数组。据测试,数组的存取速度可以达到集合的100倍。这个数字听起来有点骇人听闻,但是如果你考虑到集合是一个对象,你就会明白为什么差异会这么大。   
5. 展开小的循环体 
  在编码的时候,有可能遇到这种情况:一个循环体只会循环2到3次,而且循环体由几行代码组成。在这种情况下,你可以把循环展开。原因是循环会占用额外的CPU时间。但是如果循环比较复杂,你就没有必要这样做了。   

6. 避免使用很短的函数 
  和使用小的循环体相同,调用只有几行代码的函数也是不经济的--调用函数所花费的时间或许比执行函数中的代码需要更长的时间。在这种情况下,你可以把函数中的代码拷贝到原来调用函数的地方。   

7. 减少对子对象的引用
   在VB或者VBA中,通过使用.来实现对象的引用。例如: Form1.Text1.Value
        在上面的例子中,程序引用了两个对象:Form1和Text1。利用这种方法引用效率很低。但遗憾的是,没有办法可以避免它。
        程序员唯一可以做就是使用With或者将用另一个对象保存子对象(Text1)。
       ' 使用With
        With frmMain.Text1 = "Learn VB"
               .Alignment = 0
               .Tag = "Its my life"
               .BackColor = vbBlack
               .ForeColor = vbWhite
         End With
    或者 ' 使用另一个对象保存子对象
         Dim txtTextBox as TextBox
         Set txtTextBox = frmMain.Text1
         TxtTextBox.value = "Learn VB"
         TxtTextBox.Alignment

发布人:esmile-Access中国  
分享到:
点击次数:  更新时间:2013-08-19 15:10:07  【打印此页】  【关闭】
上一条:【技巧】excel文件破解密码  下一条:把Microsoft Outlook下载后删除的邮件恢复到web邮箱中



相关文章

  • • Access数据库设计技巧-第五部分
  • • Access数据库设计技巧-第四部分
  • • Access数据库设计技巧-第二部分
  • • Access数据库设计技巧-第一部分
  • • Access数据库设计技巧-第三部分
  • • 使用Access和Excel之间的选择理由
  • • access开发应用程序的过程汇总
  • • ACCESS提示错误信息,自动崩溃,数据库损坏的问题与解决办法

热门文章

  • [2005-08-14] 让你的代码速度更快一些access数据库
  • [2004-03-14] Access键盘快捷键大全[上]access数据库
  • [2009-12-01] 面向初学者的窗体功能设计集成access数据库
  • [2008-11-20] 在ACCESS中LIKE的用法access数据库
  • [2006-11-19] 将Access数据库移植到SQL Serveraccess数据库
  • [2009-09-30] 在窗体中自动创建按字段的模糊值进行查询access数据库

热门产品

公司动态|在线留言|在线反馈|友情链接|会员中心|站内搜索|网站地图

Access交流网 版权所有 1999-2018 粤ICP备10043721号

QQ:18449932

Access应用 Access培训 Access开发 Access平台

access|数据库|access下载|access教程|access视频|access软件

Powered by MetInfo 5.3.12 ©2008-2023  www.metinfo.cn