access表格控件Word格式.docx

access表格控件Word格式.docx

《access表格控件Word格式.docx》由会员分享，可在线阅读，更多相关《access表格控件Word格式.docx（8页珍藏版）》请在冰豆网上搜索。

控件是窗体或报表的组成部分，可用于输入、编辑或显示数据。

例如，对于报表而言，文本框是一个用于显示数据的常见控件；

对于窗体而言，文本框是一个用于输入和显示数据的常见控件。

其他常见控件包括命令按钮、复选框和组合框（下拉列表）。

本文内容了解控件

　　了解布局（需要20xx或更高版本的access）

　　了解控件

　　利用控件，您可以查看和处理数据库应用程序中的数据。

最常用的控件是文本框，其他控件包括命令按钮、标签、复选框和子窗体/子报表控件。

　　控件可以是绑定控件、未绑定控件或计算控件：

　　绑定控件其数据源是表或查询中的字段的控件称为绑定控件。

使用绑定控件可以显示数据库中字段的值。

值可以是文本、日期、数字、是/否值、图片或图形。

例如，显示雇员姓氏的文本框可能会从“雇员”（employees）表中的“姓氏”（lastname）字段获取此信息。

　　未绑定控件不具有数据源（如字段或表达式）的控件称为未绑定控件。

可以使用未绑定控件显示信息、图片、线条或矩形。

例如，显示窗体标题的标签就是未绑定控件。

　　计算控件其数据源是表达式（而非字段）的控件称为计算控件。

通过定义表达式来指定要用作控件的数据源的值。

表达式可以是运算符（如=和+）、控件名称、字段名称、返回单个值的函数以及常数值的组合。

例如，以下表达式将“单价”（unitprice）字段的值乘以常数值（0.75）来计算折扣

　　为25%的商品价格。

　　=[unitprice]*0.75

　　表达式可以使用来自窗体或报表的基础表或查询中的字段的数据，也可以使用来自窗体或报表中的另一个控件的数据。

注释通过添加计算字段可在表中执行计算，或通过在查询网格的“字段”行中输入表达式可在查询中执行计算。

之后，只需将窗体和报表绑定到这些表或查询，即可在窗体或报表上显示计算，而无需创建计算控件。

　　在创建窗体或报表时，首先添加和排列所有绑定控件可能会最有效，特别是在对象上的大多数控件都是绑定控件时更是如此。

然后，您可以在布局视图或设计视图中，通过使用“设计”选项卡上的“控件”组中的工具，添加未绑定控件和计算控件来完成设计。

　　通过标识控件从中获得其数据的字段，可以将控件绑定到字段。

通过将选定字段从“字段列表”窗格拖动到窗体或报表，可以创建绑定到该字段的控件。

“字段列表”窗格显示窗体的基础表或查询的字段。

若要显示“字段列表”窗格，请在布局视图或设计视图中打开对象，然后在“设计”选项卡上的“工具”组中，单击“添加现有字段”。

当您双击“字段列表”窗格中的某个字段时，access会向对象添加该字段的相应控件类型。

　　另外，您可以通过在控件本身内部键入某个字段的名称（如果已在设计视图中打开对象）或在控件的属性表中的“控件来源”属性框中键入某个字段的名称，将该字段绑定到控件。

属性表定义控件的特征，如它的名称、数据源和格式。

若要显示或隐藏属性表，请按F4。

使用“字段列表”窗格是创建绑定控件的最佳方式，其原因有两个：

access会自动使用字段名称（或者在基础表或查询中为该字段定义的标题）来填写控件附带的标签，因此，您不必自己键入控件标签的内容。

　　access会根据基础表或查询中字段的属性（例如，“格式”、“小数位数”和“输入掩码”属性），自动将控件的许多属性设置为相应的值。

　　如果已经创建未绑定控件并且想将它绑定到字段，请将控件的“控件来源”属性框中的值设置为该字段的名称。

有关“控件来源”属性的详细信息，请在光标位于属性的下拉列表中时按F1。

　　了解布局

　　布局功能是在access20xx中加入的新功能，因此需要需要安装20xx或更高版本的access。

　　布局是一些参考线，可用于将您的控件沿水平方向和垂直方向对齐，以使您的窗体具有一致的外观。

您可以将布局视为一个表，该表中的每个单元格要么为空，要么包含单个控件。

下列过程演示如何在布局中添加、删除或重新排列控件。

　　配置布局的方式有很多种，但通常会使用表格式或堆叠式格式来配置布局。

利用这两大格式，您可以拆分或合并单元格以自定义布局，使布局更适合您的控件。

有关详细信息，请参阅在布局中拆分或合并一节。

　　在表格式控件布局中，各个控件按行和列进行排列（就像在电子表格中排列一样），其中标签位于顶部，如下图所示：

　　表格式控件布局总是会跨越窗体或报表的两个部分。

无论控件位于哪一个部分中，标签都会位于上面的那个部分中。

　　在堆叠式布局中，各个控件会沿垂直方向进行排列（类似于您在纸制表单中可能看到的情况），每个控件的左侧都有一个标签，如下图所示：

　　篇二：

access报表控件整理代码

　　optioncomparedatabase

　　=========================================

　　作用:

为报表画线,统一各控件的宽度.高度.和间隙

　　1.取主体和页面页眉第一个控件的高度height为标准,设置其他控件的高度.

　　2.以主体的每一个控件的宽度width为标准,设置页面页眉相对应控件的宽度

　　3.连接主体和页面页眉的控件,使其隙一致.

　　==========================================

　　publicFunctionReportsheet（rptasReport,_

　　leftcontrolascontrol,_

　　Rightcontrolascontrol,_

　　optionalRowsofpageasinteger,_

　　optionalstyleasinteger=0,_

　　optionalhascolumnheaderasboolean=true）报表画线设置onerrorResumenext

　　dimintiasinteger

　　dimlngtopaslong表格上边距，即报表页眉的高度

　　dimlngbottomaslong表格下边距，报表页眉的高度＋主体节高度×

每页要显示的记录数dimlngleftaslong表格左边距，第一个控件的左边距

　　dimlngRightaslong表格右边距，最后一个控件的左边距＋最后一个控件的宽度dimlngRowheightaslong行高，即主体节高度

　　dimlngacdetaiheightaslong主体高度

　　dimlngsumhaslong主体多行的总高度+页面页眉的高度（线上端起始位置）

　　dimlngymkjheightaslong页面页眉最低层（标题）行中的第一个控件的高度

　　dimlngRowsaslong

　　dimlngRowtopaslong

　　dimlngbottommaxaslong

　　dimlng

　　dimctlascontrol

　　withrpt

　　Foreachctlin.section（acpageheader）.controls

　　ifctl.tag="

ymym"

then页面页眉的标题行要在tag中作出特殊标记ymym

　　lngymkjheight=ctl.heightctl.top

　　exitFor

　　endif

　　next

　　lngRowheight=.section（acdetail）.height行高：

主体节高度

　　lngtop=.section（acpageheader）.height设上边距为页面页眉高度，为防止报表没有页面页眉所以代码单独一行

　　if.page=1thenlngtop=lngtop+.section（acheader）.height第一页再加上报表页眉高度，为防止报表没有报表页眉所以代码单独一行

　　lngbottommax=.section（acpageFooter）.height页面页脚高度，为防止报

　　表没有页面页脚所以代码单独一行

　　lngacdetaiheight=.scaleheight-lngbottommax下边距lngbottommax=.scaleheight-lngbottommax报表高度减去页面页脚高度得到最大允许的下边距

　　.drawwidth=5

　　endwith

　　lngRows=int（（lngbottommax-lngtop）/lngRowheight）当前页面能容纳的行数ifRowsofpage>

0then

　　ifRowsofpage　　endif

　　lngbottom=lngtop+lngRowheight*lngRows根据行数计算表格下边距

　　ifhascolumnheaderthen

　　lngRows=lngRows+1

　　lngtop=lngtop-lngymkjheightlngRowheight页面页眉的高度减页面页眉控件高度（行高）

　　lngacdetaiheight=lngacdetaiheight-lngymkjheight

　　lngleft=rpt.scalewidth

　　Foreachctlinrpt.section（acpageFooter）.controls

ymyj2"

then页面页脚的第一行ymyj第二行ymyj2要在tag中作出特殊标记

　　lngacdetaiheight=lngacdetaiheight+ctl.height+ctl.top

　　Foreachctlinrpt.section（acdetail）.controls

　　iflngleft>

ctl.leftthenlngleft=ctl.left表格左边距iflngRight　　ifstyle1thenrpt.line（ctl.left,lngtop）-（ctl.left,lngbottom）画竖线

　　下面加50，是把最后一行线下移50，和左右竖线延长50，是为了防止最后一排控件的高度太小，与线太靠近了，是为了更好看一点。

　　ifstyle1thenrpt.line（lngRight,lngtop）-（lngRight,lngacdetaiheight+50）在最右边画竖线ifstyle1thenrpt.line（lngleft,lngtop）-（lngleft,lngacdetaiheight+50）在最左边画竖线画横线

　　ifstyle2then

　　rpt.line（lngleft,lngtop）-（lngRight,lngtop）画标题顶横线

　　Forinti=0tolngRows

　　主体多行的总高度+页面页眉的高度（线上端起始位置）

　　lngsumh=lngRowheight*inti+lngtop+lngymkjheight

　　rpt.line（lngleft,lngsumh）-（lngRight,lngsumh）

　　else

　　lngsumh=lngRowheight*inti+lngtop

　　rpt.line（lngleft,lngacdetaiheight+50）-（lngRight,lngacdetai