Access常见问题解决方法

时　间:2014-12-17 08:28:02
作　者:宏鹏（转载）   ID：21115  城市：上海
摘　要:Access常见问题解决方法
正　文:

条件：男，小于20岁的打钩其余空着：

在控件来源中输入：“Iif（[年龄]<20 and [性别]=”男”, true,false）”

显示四位出生年：在条件行中输入“Year（now-[年龄]）”

1980以后：在条件行中输入：>=1980-1-1

标签为红色：在代码中输入：forecolor=255

引用窗体对象（参数查询）：在准则行中输入：[forms]![窗体名]![控件名]

学生ID：在条件行中输入：left（[学生ID]，4）

页码：添加一个文本框，在文本框中输入：[page]&”/”[pages]

窗体功能：打开窗体、单击“计算”按钮（名为bt），事件过程使用ADO数据库技术计算初表对象“tEmp”中党员职工的平均年龄，然后讲结果显示在窗体的文本框“tAge”内并写入外部文件中。

(1)     dim is as new ADODB.Recordset

(2)     Strsel

(3)     If rs.EOF then

(4)     Me.Tage=sage

Eof 函数：新纪录是=true；非新纪录=false（指向非新纪录）

入校年：在条件行输入：year（[入校日期]）

控件的标题属性：在VBA代码中输入：me.btitle.coption=Me.tText

组合框值男或女：可在向导中输入（或空间来源中输入）：“男”：“女”

（2）修改查询对象“qEmp”为参数查询，参数为引用窗体对象“fEmp”上文本框“tSS”的输入值；在条件行输入：[forms]！[窗体名]！[控件名]

（3）设置窗体对象“fEmp”上文本框“tPa”为计算控件。要求依据“党员否”字段值显示内容：“党员否”字段值为Ture，显示“党员”两字；“党员否”字段值为False，显示“非党员”三个字；

（3）空间来源中输入：=iif([党员],"党员",,"非党员")

（4）单击“刷新”按钮（名为bt1），事件过程动态设置窗体记录员为查询对象“qEmp”，事件窗体数据按性别条件动态显示；单击“退出”按钮（名为”bt2”），关闭窗体。

（4）动态显示查询对象qEmp

Recordsource=“qEmp”

Docmd.close

年龄最大值减去 最小值：一般填写在计算控件中：max（[年龄]）-（[年龄]）

（5）命令按钮（名为bList），单击该按钮后，应事先将"tStudent"表中的全部记录显示出来的功能。在VBA代码中相应位置输入：

Bbb.form.Recordsource=”select*form tstudent”

（3）查找小于平均年龄的学生，

一般为查询，在条件行中输入：<(select Avg([年龄])form student)

学号前六位：在条件行输入：left（[student.学号]，6）

Cmdsowe.Enabled=ture

使用ADO数据库技术算出表对象“tEmp”中党员职工的平均年龄，然后显示在窗体的文本框“tAge”内并写入外部文件中。在VBA代码中相应位置输入：

If rs.EOF = True Then(指向了新纪录所以用true)

Me!tAge = sage

文本框中输入文字与文本串连接：在VBA代码中相应位置输入：

Btitle.caption=Trim(tText+”等级考试”)

（4）输入1时，相关关闭窗体（或程序）；输入2时预览输出报表“rEmp”；输入>=3时调用宏“mEmp”打开数据表"tEmp"在VBA代码中相应位置输入：

k = InputBox("请输入大于0的整数值")

DoCmd.OpenReport "rEmp", acViewPreview

DoCmd.RunMacro "mEmp"

在窗体四个文本框内输入合法的职工信息后，单击”追加”按钮（名为bt1）,程序首先判断职工编号是否重复，如果不重复则向表对象”tEmp”中添加职工纪录，否则出现提示；当点击窗体上的”退出”按钮（名为bt2）时，关闭当前窗体。在VBA代码中相应位置输入：

If ADOrs.EOF = False Then

DoCmd.Close

检索函数 DLookUp：从非数据源表中检索出对应部门名称：在空间来源中输入：

=DLookUp("名称","tGroup","部门编号='" & Reports!rEmployee!所属部门 & "'")

docmd对象的OpenReport：acViewDesign—报表设计视图，acViewNormal—报表普通视图

docmd.RunMacro Macroname

ObjectType为可选参数，用于指定数据库对象类型，可使用下列常量：

acDataAccessPage：数据访问页。Ø

acDefault：默认。Ø

acDiagram：数据库图表。Ø

acForm：窗体。Ø

acFunction：函数。Ø

acMacro：宏。Ø

acModule：模块。Ø

acQuery：查询。Ø

acReport：报表。Ø

acServerView：服务器视图。Ø

acStoredProcedure：存储过程。Ø

acTable：表Ø

inputbox (提示信息,消息框的标题,输入框里面的默认值)

第一个为必选参数,第二个和第三个参数为可选参数,当不写第二个参数,而写第三个参数,第二个参数的逗号不能少.

Msgbox( 对话框提示信息,按钮类型,标题) 第一个参数必选,第二,第三个参数可选.

（1）   布尔型型数据(boolean):

只有两个值,true和false ,.布尔型数据和其他数据类型相互转化的准则.布尔型转化成数值.true转换为-1,False转换为0。其他类型数据转换为布尔型数据时， 0转化为false，其他值转化为true。

打开“本地窗口”可看到每一步执行的结果，打开“立即窗口”用Debug执行结果，可以看到最终结果

Caption：标题属性

Visible：可见性。当其值为True，可见；为False时不可件。

Forecolor：前景色，即控件里的文字颜色。

Enabled:是否有效，是否可用。当该属性值为True时，该控件可用。为False时，该控件不可用，不会响应任何事件。

RecordSource：记录源属性

TimerInterval：计数器间隔事件，单位为毫秒。

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