快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

ACCESS数据库开发技巧(三)

  Access最重要的特征就是一般不必去写程序,然而可能因为要执行复杂或专业的操作而必须在模块中用Visual Basic编写程序,然后通过窗体中的命令按钮来执行相应的程序完成相应的任务。比如排名次、分段统计等。在编写Visual Basic程序时要注重以下一些问题和技巧。


  1、变量的运用
  
  ①对象变量的运用
  在Access中运用Visual Basic编写程序,需要运用其数据访问对象。它包括数据库引擎(DBEngine)、工作空间(Workspace)、数据库以及数据库对象中的表、查询、记录集等对象。如缺省工作空间:DBEngine.Workspaces(0),当前数据库:DBEngine.Workspaces(0).Databases(0)。我们可以用一个对象变量来表示一个对象,这样将为编程带来很大方便。为对象变量赋值要用Set语句,而不要直接赋值。例如:
  Dim thedb As Database
  Set thedb = DBEngine.Workspaces(0).Databases(0)
  
  ②Variant 数据类型的运用
  Variant 数据类型是所有没被显示声明(如 Dim、Private、Public 或 Static等语句)为其他类型变量的数据类型。Variant 是一种特别的数据类型,除了定长 String 数据及用户定义类型外,可以包含任何种类的数据。Variant 也可以包含 Empty、Error、Nothing 及 Null特别值。Empty 值用来标记尚未初始化(给定初始值)的 Variant 变量。内含 Empty 的 Variant 在数值的上下文中表示 0,假如是用在字符串的上下文中则表示零长度的字符串 ("")。Null 表示未知数据或丢失的数据,即无效数据。不应将 Empty 与 Null 弄混。Null 是表示 Variant 变量确实含有一个无效数据。
  当有些量可能出现Null值时,可将该变量定义为Variant 数据类型。Variant 数据类型为编程者提供很大的灵活性,但牺牲了代码的速度和长度。

  ③通过变量来间接引用数据库对象及限定条件
  为了增加灵活性,提高控制能力,减少代码的重复和运用循环语句,在程序中应充分运用变量来间接引用数据库对象和限定条件。比如各个年级学生成绩排名次的处理程序,只是各年级的成绩表名不同,我们可以将程序中的成绩表名用一个变量如“bzcjb”来表示,详细处理时再替换为详细的表名,如替换为高一年级的成绩表名“g1cjb”。

 在详细运用中有一些问题要注重,如:
  Dim thedb As Database
  Set thedb = DBEngine.Workspaces(0).Databases(0)
  Dim thecsb As Recordset
  Set thecsb = thedb.OpenRecordset(bzcjb, DB_OPEN_DYNASET)
  这里“bzcjb”可代表任意一个成绩表,若“bzcjb”本身就是一个已存在的数表名,则上述最后一个语句中的“bzcjb”应加上引号,如下所示:
  Set thecsb = thedb.OpenRecordset("bzcjb", DB_OPEN_DYNASET)

  再比如Dcount 函数可用于确定特定记录集中的记录数。可以在 Visual Basic、宏、查询表达式,或计算控件中使用 DCount 函数。
  语法是:DCount(expr, domain[, criteria])
  其参数如下:
  expr 表达式,用于标识将统计其记录数的字段。可以是一个标识表或查询中字段的字符串表达式。 Expr可为字段的名称或“*”,除非是“*”, Dcount 函数对包含空字段的记录不记数,若为“*”,Dcount 函数计算记录总数。domain字符串表达式,代表组成域的记录集,可以是表的名称或查询的名称。criteria 可选的字符串表达式,用于限制 DCount 函数执行的数据范围。对于其限制条件criteria 可用一个变量来代替,比如要统计表“g1cjb”中字段“语文”分数大于等于80分的人数,可用下式来完成:
  DCount("*", "g1cjb", " [班级]>=80")
  假若用数字型变量“n”来替换“80”则如下:
  DCount("*", "g1cjb", " [班级]>=" & n)
  假若用字符型变量“n”来替换“80”则如下:
  DCount("*", "g1cjb", " [班级]>=\\\'" & n & "\\\'")
  要注重替代的形式是不同的。上面的符号“&”是连接运算符。

  2、如何产生程序运行进度框

  若在程序运行时能产生一个程序运行进度框将会增加不少乐趣,Access可以实现这一要求。本人在实践中摸索出一种简朴的方式,就是通过在窗体中建两个文本框,一个大一点的长条形文本框(填充色为白色),作为外框,一个窄一点的长条形文本框(填充色为其他彩色,长度取为0.011厘米),作为产生程序运行流水线用,它们的初始状态均为不可见。然后在程序中控制其属性为可见的且修改进度流水线文本框的宽度来显示程序的进展情况。要注重的是为了让进度框在程序运行时能及时显示出来必须用SetFocus 方式将焦点移动到进度框上,并且要调整好流水线文本框与外框文本框的初始位置。注重,在用Width 属性改变控件宽度时其单位为“Twip”,1Twip=1/1440英寸,约为1/567厘米。
返回类别: 教程
上一教程: 使用SQL MAIL收发和自动处理邮件中的扩展存储过程简介
下一教程: 数据库的查询优化技术

您可以阅读与"ACCESS数据库开发技巧(三)"相关的教程:
· ACCESS数据库开发技巧(四)
· ACCESS数据库开发技巧(二)
· ACCESS数据库开发技巧(一)
· LINUX下MSQL数据库开发技术
· 数据库正规化和设计技巧(3)
    微笑服务 优质保证 索取样品