access几个小技巧集锦

时　间:2007-11-05 08:47:28
作　者:贺德才   ID：140  城市：襄樊
摘　要:ACCESS集锦
正　文:

1、使窗体或报表的文本框随文字的多少自动加大或缩小：
            文本框属性“可以扩大”
    2、控制某字段只能填写某些内容：也许你想让使用程序的人只能在某个字段里a，那么你就得控制他不难让他填b。具体表达式为
            =Instr（"abc",[A]）>0
    3、并置几个字段：也许你填表时有两个字段分别是“湖北大学”、“数学专业”，但当你在打印报表时却想让这两个了段变为一个字段放在一起，即“湖北大学数学专业”，那么最好的办法就是并置。表达式为：
            =([A]&[B])或者=([A]&""&[B])
    4、查询中的计算字段：也许在您的表中有两个数字字段，然后您想在报表中出现一个关于这两个字段关系的字段，那么简单的方法就是计算，这计算可以加，可以减，可以乘，可以除，视情况而定。表达式为：
            名称：[A]*[B](这里假设相乘，“名称”可自定)
    5、计算年龄表达式：有人喜欢在表中设计录入一个人的年龄，这不是聪明的做法。因为每个人的年龄是在不断增加的，到下一年再重新进行大批量重新录入，那就没有电脑的智能作用。最好的做法是在表中设计一个身份证号码字段。有了这个字段后，某人的“年龄”和“性别”都是可以确定的，而且一劳永逸，除非你不会把你计算机的系统时间调准确。这里是假设表中已经有“出生年月”字段以后通过它确定“年龄”的表达式：
            =Datediff("yyyy",[A],now())
    6、在窗体或报表进行值转换：有时候想将表中的在窗体或其他地方显示为你想要的内容，办法就是进行值转换。比如表中有“出生年月”的记录，你想在窗体不显示具体的出生年月，而显示“今天是这人的生日”或“这人距生日还有x天”这样的信息，或者有一个“分数”字段而你却想在窗体上显示出某学生是“优生”、“差生”、“及格”等信息，你要用上以下表达式：
            =iif([A]=x,"y",iif([A]=z,"p","m"))
    7、在窗体中对某字段进行数据锁定：在用窗体编辑数据时，有时你可能不想让人对其中某一个或几个字段进行修改，那么，你得对不想让人修改的字段进行锁定。其方法：
            字段-属性-数据-是否锁定-是
    8、求和表达式：对两个以上字段值进行求和，表达式为：
            =Sum([A]+[B]+……)
    9、标签并置并且格式化数字字段：如果你想将表中电话号码“13972088783”在窗体或报表显示时变为“1397－2088783”，你就得用以下表达式：
            =Trim([A]& ","&[B]&""Format([C],"@@@@-@@@@@@"))
    10、并置运算：
            安符与非字符：="今天日期是:"&date()
            字段与字段：  =[A]+[B]
            字段与字符：  =[A] &"abc"(A、B、C为任意字符)
    11、显示带有文本的系统日期：
            ="今天是:"+cstr(date())
    12、把字段内容直接嵌入文本表达式：如果你想让打印的报表的表头随调入的动态数据的改变而跟着改变，你必须用此方法：
            =[单位名称]&"教职工花名册"
            =format(now(),"yyyy")&[单位名称]&"教职总数"
            ="这位同学名叫"&[姓名]&"，""其中考总成绩为"&[总成绩]&"。"
    13、在查询中更改字段名称：
            新名称：（放在原字段前）
    14、返回确定日期段的数字值：
            Datepart(interval,date,firstweekday,firstweek)
    15、查询窗体打开时不显示空白的代码：按某种条件进行查询，目的是要打开一个显示窗体。可是有时候或因为输错条件，或因为根本没这个记录，那么你可能得到一个非常让你失望的呆板的“白板窗体”。避免这种情况发生的做法就是，在该窗体的“打开”属性中输入以下代码：
          On Error GoTo err

    DoCmd.GoToRecord , , acLast
i = Me.CurrentRecord
    DoCmd.GoToRecord , , acFirst
exit_form_open:
  Exit Sub

Access软件网官方交流QQ群 (群号:54525238) 　　　　　　Access源码网店