ACCESS 窗体属性表代码说明
access计算机代码归纳

第一套加载窗体fQuery重置窗体标题为“显示查询信息”Add1 Me.Caption = “显示查询信息”退出cQuit命令按钮改的文字颜色改为红色Add2 Me. 命令7.ForeColor = vbRed字体粗细改为加粗,加粗为700Add3 Me. 命令7.FontWeight = 700tStudent表中的全部记录显示Add4 BBB.Form.RecoedSource = “ select * from tStudent”第二套将Tda标签的标题设置为“YYYY年雇员信息”Add1 Me.Tda.Caption = Year(Date) & "年雇员信息"设置代码执行宏Add2 DoCmd.RunMacro "m1"第三套将标签显示内容设置为所选项目名加上"内容:"Add1 Me.Ldetail.Caption = Me.CItem.Value & "内容:"显示全部记录Add2 fDetail.Form.RecordSource = "tStud"设置提示框Add3 MsgBox "查询项目或查询内容不能为空!!!", vbOKOnly, "注意"设置窗体标题为标签tTitle的标题Add4 Me.Caption = Me.tTitle.Caption第五套(同3套,少标题)Add1 Me.Ldetail.Caption = Me.cItem.Value & "内容:" Add2 Me.fDetail.Form.RecordSource = "tStud"Add3 MsgBox "查询项目和查询内容不能为空!!!", vbOKOnly, "注意"第六套单击修改按钮,保存按钮变为可用Add1 Me.CmdSave.Enabled = True焦点移到"CmdEdit"命令按钮Add2 Me.CmdEdit.SetFocus第八套设置窗体标题为“xxxx年信息输出”Add1 Me.Caption = Year(Date) & "年信息输出"预览方式输出报表rEmpAdd2 DoCmd.OpenReport "rEmp", acViewPreview第九套消息框提示关闭窗体Add If MsgBox("确认退出?", vbYesNo + vbQuestion, "提示") = vbYes ThentSub学号第56位判断专业控件来源=IIf(Mid([学号],5,2)="10","信息","管理")第十套实现“tPass”文本框内容以密码形式显示Add1 Me.tPass.InputMask = "password"用户名为cueb ,用户密码为1234Add2 If name = "cued" And pass = "1234" ThenAdd3 Me.tUser.SetFocusAdd4 DoCmd.Close 第十一套表tDept的控件来源=DLookUp("科室名称","tOffice","科室ID='" & [科室ID] & "'")tDoct的控件来源=DLookUp("姓名","tDoctor","医生ID = '" & [医生ID] & "'")将标签显示内容设置为所选项目名加上"内容:"Add1 Me.Ldetail.Caption = Me.CItem.Value & "内容:"显示全部记录Add2 fDetail.Form.RecordSource = "tStud"设置提示框Add3 MsgBox "查询项目或查询内容不能为空!!!", vbOKOnly, "注意"设置窗体标题Add4 Me.Caption = Year(Date) & "年" & Month(Date) & "月" & Me.tTitle.Caption第十二套tPa的控件来源=IIf([tEmp]![党员否]=[ture],"党员","非党员")窗体对象改为查询对象”qEmp ”动态设置窗体记录源属性Add1 Me.Form.RecordSource = "qEmp"关闭窗口Add2 DoCmd.Close第十三套txtIf的控件来源=IIf(Sum([单价]*[数量])>30000,"达标","不达标")第十四套计算满足表达式1+2+3+..+n<=30000 在Program行中输入Dim s As IntegerDo While s <= 30000n = n + 1s = s + nLoopn = n – 1代码调用宏对象"mEmp" Add2 DoCmd.RunMacro "mEmp"设置窗体标题为标签"bTitle"的标题内容Add1 Me.Caption = Me.bTitle.Caption第十五套题干为对不起!为输入雇员姓名,请输入!Add1 Set rs = New ADODB.RecordsetAdd2 If Not rs.EOF ThenAdd3 Me.TxtDetail = ""第十六套tDept的控件来源=DLookUp("名称","tGroup","部门编号='" & [所属部门] & "'")第十七套窗体标题显示为**月**日####Me.Caption = Trim(Month(Date) & "月" & Day(Date) & "月") & Trim(Me.bTitle.Caption)第十八套窗体标题显示为**月**日####样例Me.Caption = Trim(Month(Date) & "月" & Day(Date) & "日") & Trim(Me.bTitle.Caption & "样例")第十九套使用DLookUp函数查询并将结果分别显示在标签上Add1 btitle2.Caption = "性别查询结果: " & COMBO1.Value & "的平均年龄为" & DLookup("平均年龄", "qEmp", "性别='" & COMBO1.Value & "'")设置组合框列表框行来源,用于列出不同的性别值供选择Add2 BO1.RowSourceType = "值列表"BO1.AddItem "男"BO1.AddItem "女"设置Label2初始标签值为“性别查询结果:”Add3 Me.btitle2.Caption = "性别查询结果:"第二十套窗体标题显示为CD明细显示Me.Caption = Me.bTitle.Caption & "显示"CDID标签的文字颜色改为红色Me.CDID_标签.ForeColor = vbRed第二十一套文本框已输入的字符串反向显示设置循环Add1 For i = Len(s1) To 1 Step -1将结果显示在bTxt2中Add2 Me.bTxt2.Value = s2第二十二套窗体标题显示为**月####Me.Caption = Month(Date) & "月" & Me.bTitle.Caption第二十三套设置过滤属性,输出团员信息Add1 Me.RecordSource = "select * from tStudent where 政治面貌= '团员'"设置子对象的数据源Add2 Me.子对象.SourceObject = "fGrade"取消子窗体导航按钮Add3 Me.子对象.Form.NavigationButtons = FalseAdd4 DoCmd.Close第二十四套等级考试测试Me.bTitle.Caption =Me.tText.Value & Trim("等级考试测试")英文部分大写输出Me.Caption = UCase(Me.bTitle.Caption)第二十五套设置bTitle标签为红色文本显示Add1 Me.bTitle.ForeColor = vbRed'调用mdPnt,预览输出Add2 mdPnt acViewPreview'调用mdPnt,打印输出Add3 mdPnt acViewNormal第二十六套代码重置"bTitle"标签的标题为"员工最大年龄差为XXX" Add1 Me.bTitle.Caption = "员工最大年龄差为" & (DMax("年龄", "temp") - DMin("年龄", "temp"))消息框提示报表输出(外观样式见题干图例)Add2 If MsgBox("报表预览", vbYesNo + vbQuestion, "确认") = vbYes Then第二十七套重置窗体标题为"XXXX年度党员学生信息"Add1 Me.Caption = Year(Date) & "年度党员学生信息"设置窗体的记录源Add2 Me.RecordSource = "SELECT * FROM tStud where [党员否]=true"关闭当前窗体DoCmd.Close第二十八套非团员人数为XXXXAdd1 bTitle.Caption = "非团员人数为" & DCount("学号", "tstud", "团员否=FALSE")验证用户输入Add2 If Name = "csy" And pass = "1129" Then光标焦点移至要求文本框内Me.tUser.SetFocus第二十九套设置窗体标题为当前日期Add1 Me.Caption = Date设置"fTitle"标签的标题Add2 Me.fTitle.Caption = "读者借阅信息"预览方式打开报表并设置条件输出高级读者(职称为"教授"和"副教授"的读者)借阅信息Add3 DoCmd.OpenReport "rReader", acViewPreview, "qT", "职称in('教授','副教授')第三十套重置窗体标题为"系统登录" Add1 Me.Caption = "系统登录"验证用户输入Add2 If tUser = "cueb" And tPass = "1234" Then光标焦点移至要求文本框内Add3 Me.tUser.SetFocus 第三十二套报表标题****年度######Me.Caption = Trim(Year(Date) & "年度") & Trim(Me.bTitle.Caption)定义变量f为整型Dim f As Integer窗体标题自动显示为“计时器”Form.Caption = "计时器"设置铃声Beep在文本框中显示计时的秒数Me.txtList.Value = s第三十三套设置窗体标题为"**年度报表输出"Add1 Me.Caption= mid(Year(Date),3,2) & "年度报表输出"设置窗体"退出"命令按钮标题为粗体显示Add2 Me.bt2.FontBold = -1预览方式输出报表rEmpAdd3 DoCmd.OpenReport "rEmp", acViewPreview第三十四套题干为:没有这个职员Add1 If isnull (Trim(me.txtName))thenAdd2 strSQL = “ select * from tEmp where 姓名= ‘” & name & “’”Add3 If rs.EOF then。
ACCESS 窗体

第2章窗体指定当窗体上的命令按钮保持按下状态时,是否重复执行事件过程或宏使用AutoRepeat 属性可以指定当窗体上的命令按钮保持按下状态时,是否重复执行事件过程或宏True 、False允许添加me.AllowAdditions= True记录不锁定me.RecordLocks = 1是否自动居中AutoCenter= True,False是否自动调整AutoResize = True,False窗体边框样式me.BorderStyle=1 中译:无其它1 无2 细边框3 可调边框4 对话框边框设置窗体、页眉、页脚颜色:Me.Section(0).BackColor = 200Me.Section(1).BackColor = 200Me.Section(2).BackColor = 200窗体标题me.Caption="中国ACCESS软件网" 中译:窗体标题为"中国ACCESS软件网"(不含引号)关闭按钮me.CloseButton =True 中译允许关闭按钮其它:true:允许 False:不允许控制框me.ControlBox =True 允许其它:true:允许 False:不允许默认视图me.DefaultView =0 为单一窗口其它:0:单一窗口1:连续窗体2:数据表允许分隔线me.DividingLines =True 中译允许分隔线其它:true:允许 False:不允许允许打印版式英文:youtForPrint =True 中译允许打印版式其它:true:允许 False:不允许无最大最小化按钮英文:me.MinMaxButtons =0 中译无最大最小化按钮其它:0:无 1:最大化 2:最小化 3:两者都有允许浏览按钮英文:me.NavigationButtons =True 中译允许浏览按钮其它:true:允许 False:不允许滚动条me.ScrollBars =0二者均无其它:0:二者均无 1:只垂直 2:只水平3:二者都有允许/不允许添加me.AllowAdditions=True/False允许/不允许删除me.AllowDeletions=True/False允许/不允许编辑me.AllowEdits=True/False指定是否允许打开绑定窗体进行数据输入使用DataEntry 属性可以指定是否允许打开绑定窗体进行数据输入。
access常用代码

1、单击命令按钮运行宏m1:DoCmd.RunMacro "m1"2、标签Tda标题设置为系统当前日期:Tda.Caption=Date (控件Tda (可能是标签或按钮,或者窗体)上的文字显示为当前日期)3、窗体加载时窗体标题属性为系统当前日期:Form.Caption=Date4、使“保存”按钮CmdSave变为可用:CmdSave.Enabled=True 将输入焦点移到"CmdEdit"命令按钮:Me.CmdEdit.SetFocus5、将文本框tText的内容作为窗体中标签bTitle的标题显示:bTitle.Caption=Me!tText6、打开窗体、单击"计算"按钮(名为bt),事件过程使用ADO 数据库技术计算出表对象"tEmp"中党员职工的平均年龄,然后将结果显示在窗体的文本框"tAge"内并写入外部文件中。
Ifrs.RecordCount=0Then;tAge=sage7、将tStudent表中的全部记录显示出来:Select * From tStudent8、窗体加载时窗体标题属性为系统当前日期:Form.Caption=Date9、消息框:MsgBox"请重新输入口令!",vbOkquit10、输入框(输入的值赋值给k,且k是字符串类型):k=InputBox("请输入大于0的整数值")预览输出报表对象"rEmp":DoCmd.OpenReport "rEmp",acViewPreview11、CaseIs>=3预览输出报表对象"rEmp":DoCmd.OpenReport "rEmp",acViewPreview12、Dim f(19)AsInteger f(i)=f(i-1)+f(i-2) tData=f(19)13、单击"刷新"按钮,窗体记录源改为查询对象"qEm":Form.RecordSource="qEmp" 单击"退出"按钮,关闭窗体:DoCmd.Close14、窗体"fEmp"的"加载"事件中设置标签"bTitle"以红色文本显示:bTitle.Caption=vbRed 实现报表预览输出:mdPnt acViewPreview15、消息框:MsgBox"报表预览",vbQuestion+vbYesNo,"确认"16、动态设置窗体记录源为查询对象"qEmp":Form.RecordSource="qEmp"17、将考生文件夹下的图片文件"test.bmp"设置为窗体"fEmp"的背景: Form.Picture=CurrentProject&"\test.bmp"18、CDID文本框内内容显示颜色改为红色:CDID.ForeColor=vbRed19、动态设置窗体记录源为查询对象"qEmp":Form.RecordSource="qEmp" 关闭窗体:DoCmd.Close20、使“保存”按钮CmdSave变为可用:CmdSave.Enabled=True21、将文本框中输入的内容与文本串"等级考试测试"连接,并消除连接串的前导和尾随空白字符,用标签"bTitle"显示连接结果:bTitle.Caption=Trim(tText)&"等级考试测试"22、动态设置窗体记录源为查询对象"qEmp":Form.RecordSource="qEmp"23、预览输出报表对象"rEmp":DoCmd.OpenReport "rEmp",acViewPreview24、单击“退出”按钮,关闭当前窗体:DoCmd.Close 单击“保存”按钮,“修改”按钮不可用:CmdEdit.Enable=False 用户名_1控件不可用:Me!用户名_1.Enabled=False25、将标签显示内容设置为所选项目名加上"内容:"Me.Ldetail.Caption=Me.CItem.Value&"内容:" 显示tStud表的全部记录:fDetail.Form.RecordSource="tStud" 设置提示框:MsgBox "查询项目和查询内容不能为空!!!",vbOKOnly,"注意" 设置窗体标题为XXXX年XX月+tTitle标签的标题:Me.Caption=Str(Year(Date))&"年"&Str(Month(Date))&"月"&Me.tTitle.Caption26、设置用户名为cueb,密码为1234:If name="cueb" And pass="1234"Then 文本框tUser获得焦点:Me.tUser.SetFocus设置相关属性,实现“tPass”文本框内容以密码形式显示:Me.tPass.InputMask="Password"27、数据连接:Set rs=New ADODB.Recordset如果达到表结尾:If rs.EOF Then清空TxtDetail文本框:Me.TxtDetail=""28、消息框提示关闭窗体:IfMsgBox("确认退出?",vbCritical+vbYesNo,"提示")Then 29、设置代码执行宏M1:DoCmd.RunMacro"M1"将Tda标签标题设置为“YYYY年雇员信息”,其中“YYYY”为系统当前年份,用函数获取:Me.Tda.Caption=Str(Year(Date))&"年雇员信息"30、动态设置窗体记录源属性为查询qEmp:Me.RecordSource="qEmp"31、计算1+2+3+…+n<=30000的最大值,并保存到变量n 中: Dim s As Integer:n=1:s=0Do While s<=30000:s=s+n:n=n+1:Loop:n=n–132、设置标签bTitle的标题为XX月+原标题:Me.bTitle.Caption=Str(Month(Date))&"月"&Me.bTitle.Caption 33、设置bTitle标签为红色文本显示:Me.bTitle.ForeColor=RGB(255,0,0)调用mdPnt,预览输出:CallmdPnt(2) 调用mdPnt,打印输出:CallmdPnt(0)34、输入字符串后,产生反序: s1=Me.bTxt1 '设置循环'***************Add1*************** Fori=Len(Me.bTxt1)T o1Step-1'***************Add1*************** t=Mid(s1,i,1) s2=s2&t Nexti'将结果显示在bTxt2中'***************Add2*************** Me.bTxt2.Value=s2 '***************Add2*************** EndSub35、设置bTitle的标题为窗体的标题:Me.Caption = Me.bTitle.Caption36、报表标题显示标签控件"bTitle"的内容:Me.Caption = Me37、光标置于用户名文本框(文本框名为tUser)中(表示文本框获得焦点): Me!tUser.SetFocus 点退出按钮关闭窗体: DoCmd.Close单击“保存”按钮,“修改”按钮CmdEdit不可用CmdEdit.Enable=False。
ACCESS控件-常用属性

text1.forecolor=rgb(0,0,0) ‘文字颜色设为黑色
二.控件的常用属性如下name
控件名称
任何控件
caption
控件的标题文本
窗体、标签、文本框等
value
存放的值
文本框
forecolor
控件的前景色
Access VBA中控件的常用属性
一.属性是控件的数据
用于表示控件的状态,改变控件的属性值即可改变控件的状态。属性的设置可以在设计时,在“设计器”窗口中选中某一个控件,然后在“属性”窗口中设置它的属性值;也可以在运行时,由程序代码来完成,语法格式如下:
格式:控件引用.属性名
例如,下列程序代码设置当前窗体中的text1文本框的一些属性。
窗体、标签、文本框等(字体颜色)
backcolor
控件的背景色
窗体、标签、文本框等
fontname
文本的字体
窗体、标签、文本框等
fontsize
指定控件的字号.与字体有关的属性还有:fontbold-黑体,
fontItalic-斜体,
fontUnderline-下划线
窗体、标签、文本框等
enabled
是否可用
窗体、文本框、命令按钮等
visible
是否可见
窗体、文本框、命令按钮等
height,width,left,top
指定控件的高度,宽度和起点位于直接容器的左边和上边的度量.
任何控件
controlsource
确定控件的数据源,一般为表的字段名
任何控件
Access常用代码

12、班级成绩排名查询
可根据年级、班级和不同科目替换查询中的相应字段名:
Select *, [英语]+[数学]+[语文] AS 总分, DCount("*","成绩表","[年
级]='" & [年级] & "' and ([英语]+[数学]+[语文])>" & [英语]+[数学]+[语
文])+1 AS 年级名次 FROM 成绩表 orDER BY 成绩表.年级, [英语]+[数学]+[语
文] DESC;
13、点击“保存”时显示“新增”、“修改”,隐藏“删除”命令按钮
Private Sub 保存_Click()
If MsgBox("你确认要保存用户资料吗?", 1 + 64, "确认保存") = vbOK Then
Access常用代码
1、组合框的循环选择
在双击事件中加入,也可用在键盘按上下箭头事件中:
Screen.ActiveControl.ListIndex =
(Screen.ActiveControl.ListIndex + 1) Mod Screen.ActiveControl.ListCount
10、设置字段的默认值为当前表的最后一条记录的值(或序号加1)
在窗体的成为当前事件中,用Dlast函数查找最后记录相关值并辅值给字段
的默认值:
成绩.DefaultValue = "'" & DLast("成绩", Me.RecordSource) & "'"
ACCESS常用的窗体查询方法及实例

一.概述作为数据管理程序,统计和查询功能是非常重要的。
否则,就和电子表格没有区别了。
所以,在每个ACCESS程序中都不可能缺少查询的功能。
本文的目的是由浅入深的介绍几种最常用的利用主/子窗体来实现查询的方法,使初学者和有一定VBA基础的人可以更好的使用窗体查询这种手段。
附件中的窗体“常用窗体查询0.MDB”,仅包含3个数据表、1个查询和以这个查询为数据源的报表。
是为了大家根据后面学习的内容作练习用的。
我们先看查询中的数据:书籍编号书名类别作者出版社单价进书日期22 CHIP-01-08 报刊电子计算机与外部设备期刊社电子计算机与外部设备¥16.80 2001-9-2825 电脑新时代-6光盘光盘UNKNOWN 电脑新时代¥5.00 2002-7-8 27 学电脑-7光盘光盘UNKNOWN 人民邮电¥5.00 2002-7-1328 CHIP-02-07光盘光盘电子计算机与外部设备杂志社电子计算机与外部设备¥5.00 2002-7-1316 MCSE学习指南书籍Syngress Media公司人民邮电¥62.00 2001-9-2817 局域网原理与架设技术内幕大公开书籍蔡昌均中国青年¥69.00 2001-9-2819 AccessVBA基础书籍EvanCallahan 人民邮电¥39.00 2001-9-2820 中文版Access2001一册通书籍赵琳等人民邮电¥42.00 2001-9-2821 VISUALBASIC5.0教程书籍SteveBrown 电子工业¥28.00 2001-9-2823 中文版VisualBasic5.0程序员指南书籍microsoft 中国青年¥70.00 2001-9-2824 Access中文版开发指南书籍Alison Balter 人民邮电¥128.00 2002-2-1629 Access 2002数据库系统开发实例导航书籍桂思强中国铁道¥25.00 2003-3-1030 中国名陵——集中华古代名陵之大成书籍罗哲文等百花文艺¥14.00 2003-5-2031 边缘部落——福音谷书籍林茨(撰文摄影)河北教育¥27.00 2003-5-20 为了比较有代表性,这个查询中包含多种字段类型:数字类型:【书籍编号】、【单价】字符类型:【书名】、【类别】、【作者】、【出版社】日期类型:【进书日期】在多条件查询中,我们会使用除了【书籍编号】之外的其他字段作为查询条件。
access代码

‘*********add**********'
============================================================================================
(5)窗体加载时设置窗体标题属性为系统当前日期。窗体"加载"事件代码已提供,请补充完整。
(4)"fEmp"窗体上单击"输出"命令按钮(名为"btnP"),实现以下功能:计算Fibonacci数列第19项的值,将结果显示在窗体上名为"tData"的文本框内并输出到外部文件保存;单击"打开表"命令按钮(名为"btnQ"),调用宏对象"mEmp"以打开数据表"tEmp"。
Fibonacci数列:
========================================================================================================================
在窗体"fEmp"的"加载"事件中设置标签"bTitle"以红色文本显示;单击"预览"按钮(名为"bt1")或"打印"按钮(名为"bt2"),事件过程传递参数调用同一个用户自定义代码(mdPnt)过程,实现报表预览或打印输出;单击"退出"按钮(名为"bt3"),调用设计好的宏"mEmp"以关闭窗体。
Access表中各种属性的设置

ACCESS数据表中各个属性的含义、设置方法:格式:Format 属性:可以使用Format属性自定义数字、日期、时间和文本的显示方式。
Format属性只影响数据的显示方式,不影响数据的存储方式。
String型,可读/写。
expression.Formatexpression 必需。
返回“应用于”列表中的一个对象的表达式。
说明可以使用预定义的格式,或者使用格式符号创建自定义格式。
Format对不同的数据类型使用不同的设置,对于控件,可以在控件的属性表中设置该属性。
对于字段,可以在表“设计”视图或“查询”窗口的“设计”视图中(“字段属性”的属性表中)设置该该属性。
也可以使用宏或Visual Basic。
注释在 Visual Basic 中,可输入对应预定义格式的子符串表达式或者输入自定义格式。
Access 为“时间/日期”、“数字”和“货币”、“文本”和“备注”和“是/否”数据类型提供预定义格式,预定义格式与国家/地区设置有关。
Access显示对应于所选国家/地区的格式,例如,如果在“常规”选项卡中选取“英语(美国)”,则1234.56 的“货币”格式是$1,234.56,如果在“常规”选项卡中选取“英语(英国)”,该数字将显示为£1,234.56。
如果在表“设计”字视图中设置字段的Format属性,Access使用该格式在数据表中显示数据。
对窗体和报表上的新控件也应用字段的Format属性。
在任意数据类型的自定义格式中都可以使用以下符号:不能将“数字”和“货币”型的数据类型的自定义格式符号与“日期/时间”、“是/否”或“文本”和“备注”格式符号混合使用。
如果在数据上定义了输入掩码同时又设置了Format属性,在显示数据时,Format属性将优先,而忽略输入掩码。
例如,如果在表“设计”视图中创建了“密码”输入掩码,同时又为字段设置了Format属性,则无论是在表或在窗体上的控件中,数据都将根据Format属性来显示,而“密码”输入掩码则被忽略。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
ACCESS┃窗体属性表代码说明┃
属性┃代码┃说明┃
记录源┃RecordSource┃可以是一个表或查询,也可以是SQL语句.┃
筛选┃Filter┃设置窗体显示数据的筛选条件.┃
排序依据┃OrderBy┃决定窗体显示记录的顺序┃
允许筛选┃AllowFilters┃此选项为"是",筛选才有效.┃
标题┃Caption┃设置窗体的视图界面标题栏上的显示,如果为空,则显示此窗体的名字.┃
默认视图┃DefaultView┃缺省为"单一窗体",当此窗体作为子窗体用的话,一般情况下要改为"连续窗体"或"数据表",还有"数据透视表"与"数据透视图"很少用到."单一窗体"是每页显示一个记录,"连续窗体"与"数据表"是可显示多条记录.┃
允许"窗体"视图┃AllowFormView┃这几项是设置此窗体允许显示的形式.┃
允许"数据表"视图┃AllowDatasheetView┃
允许"数据透视表"视图┃AllowPivotTableView┃
允许"数据透视图"视图┃AllowPivotChartView┃
允许编辑┃AllowEdits┃设置此窗体是否可更改数据.前提是此窗体绑定记录源┃
允许删除┃AllowDeletions┃设置此窗体是否可删除记录.前提是此窗体绑定记录源┃
允许添加┃AllowAdditions┃设置此窗体是否可添加记录.前提是此窗体绑定记录源┃
数据输入┃DataEntry┃如这里设置为是.那么此窗体只能用于添加新记录,换言之,就是每次打开都是转到新记录.当然,前提也是此窗体绑定记录源┃
滚动条┃ScrollBars┃设置此窗体具有横/竖/无滚动条┃
记录选择器┃RecordSelectors┃设置记录左边是否有一个选择记录的按钮,一般在"单一窗体"模式下是要选"否"的.需要特别注意的是:即便是设置了"否",在窗体显示是同样可以用"Ctrl+A"选择记录.┃
导航按钮┃NavigationButtons┃设置窗体下方是否需要显示跳转到记录的几个小按钮.┃
自动调整┃AutoResize┃设为"是",窗体打开时可自动调整窗体大小,依据是你的各节长宽.┃自动居中┃AutoCenter┃设置窗体是否打开时自动居于屏幕中央.如果设置为"否",则打开时居于窗体设计视图最后一次保存时的位置.┃
弹出方式┃PopUp┃如设置为"是",则此窗体打开时浮于其他普通窗体上面,只有模式设为"是"或其他同类窗体可以覆盖它.┃
模式┃Modal┃如设置为"是",则此窗体以对话框形式打开,在关闭它之前,别的窗体不能操作.┃
边框样式┃BorderStyle┃设为窗体的边框,可设置为细边框或不可调,当设置为无边框时,此窗体无边框及标题栏.┃
控制框┃ControlBox┃设置窗体标题栏左边是否显示一个窗体图标,实际上这就是窗体控制按钮.┃
最大最小化按钮┃MinMaxButtons┃设置窗体标题栏右边要显示的改变窗体尺寸的几个小按钮.┃
关闭按钮┃CloseButton┃设置是否保留窗体标题栏最右端是否保留关闭窗体的按钮.┃
宽度┃Width┃设置整个窗体的宽度.注意,这里只能设置窗体宽度,不能设置高度,窗体的高度的设置分到了各节的属性中.┃
图片┃Picture┃设置窗体背景图片.┃
图片类型┃PictureType┃这几项是设置图片显示模式的,不再多讲.┃
图片缩放模式┃PictureSizeMode┃
图片对齐方式┃PictureAlignment┃
图片平铺┃PictureTiling┃
菜单栏┃MenuBar┃指定窗体专用菜单,如果有自定义菜单的话.如果不指定,则使用系统菜单.┃
工具栏┃ToolBar┃指定窗体专用工具栏,同上.┃
快捷菜单┃ShortcutMenu┃设置是否允许使用快捷菜单,只有设为"是",下面一项设置才有效.┃
快捷菜单栏┃ShortcutMenuBar┃指定窗体专用的快捷菜单,前提是有自定义的快捷菜单.注意,这里设置的是整个窗体的快捷菜单,优先级低于特定控件指定的快捷菜单.┃
网格线X坐标┃GridX┃设置窗体网格的密度,主要是对窗体设计中有用.┃
网格线Y坐标┃GridY┃
成为当前┃Current/OnCurrent┃这里设置当一个记录为当前记录时引发的事件,可以是宏,也可以是代码.┃
更新前┃BeforeUpdate/OnBeforeUpdate┃设置窗体数据更新前需引发的事件,需注意的是这里指的是整个窗体的.┃
更新后┃AfterUpdate/OnAfterUpdate┃设置窗体数据更新后需引发的事件,同上.┃
删除┃Delete/OnDelete┃在记录删除时引发的事件,可以依据条件,中止删除动作.┃
确认删除前┃BeforeDelConfirm┃把事件引发时间分得很细,具体情况具体应用.┃
确认删除后┃AfterDelConfirm┃同上┃
打开┃Open/OnOpen┃在窗体打开时引发事件.┃
加载┃Load/OnLoad┃在窗体加载时引发事件,时间上晚于打开事件.┃
调整大小┃Resize/OnResize┃在改变窗体显示尺寸时引发事件,一般用于窗体重画(控件布局)┃
卸载┃Unload/OnUnload┃在窗体卸载时引发事件,时间上早于关闭事件.┃
关闭┃Close/OnClose┃在窗体关闭时引发事件.┃
激活┃Activate/OnActivate┃在窗体间切换时,切换到此窗体时引发的事件.┃
停用┃Deactivate/OnDeactivate┃在窗体间切换时,从此窗体切换到别的窗体时引发的事件,与上一项相反.┃
获得焦点┃GotFocus/OnGotFocus┃在此窗体获得焦点时引发事件.┃
失去焦点┃LostFocus/OnLostFocus┃在此窗体失去焦点时引发事件.┃
单击┃Click/OnClick┃在单击窗体时引发事件.┃
双击┃DblClick/OnDblClick┃在双击窗体时引发事件.。