- 1、本文档共87页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
ACCESS-VBA编程剖析
ACCESS-VBA编程
第一章 控件1
常量 控件acBoundObjectFrame 绑定对象框acCheckBox 复选框acComboBox 组合框acCommandButton 命令按钮acCustomControl ActiveX(自定义)控件acImage 图像acLabel 标签acLine 线条acListBox 列表框acObjectFrame 未绑定对象框或图表acOptionButton 选项按钮acOptionGroup 选项组acPage 页acPageBreak 分页符acRectangle 矩形acSubform 子窗体/子报表acTabCtl 选项卡acTextBox 文本框acToggleButton 切换按钮在VB中对窗体控件的引用键入包含控件的窗体或报表的标识符,后面紧接 ! 运算符和控件的名称。例如,下列标识 符将引用“订单”窗体上“订单ID”控件值:Forms![订单]![订单ID]引用子窗体或子报表上的控件,不必使用“窗体”或“报表”属性为窗体或报表指定完整的标识符。例如,可以使用下列标识符来引用“订单”子窗体上的“数量”控件:Forms![订单]![订单子窗体]![数量]判断窗体或报表中控件的数目,然后将该数目赋给一个变量。Dim intFormControls As IntegerDim intReportControls As IntegerintFormControls = Forms!Employees.CountintReportControls = Reports!FreightCharges.Count设置控件可见性Dim i, ii As IntegerFor ii = 3 To 10Me.Controls.Item(ii).Visible = TrueNextFor i = 11 To 22Me.Controls.Item(i).Visible = FalseNext按特殊名在VBA中设置控件的可见性:For i = 27 To 47If Me.Controls.Item(i).Name Like A* ThenMe.Controls.Item(i).Visible = FalseEnd IfNext指定一个控件能否接受焦点Enabled属性:me.控件.Enabled = true能=false不能指定一个控件能否被编辑:locked如:me.控件.Locked = trueme.控件.Locked = false设置控件标题显示的文字Me.控件.Caption = 显示窗体设置标签颜色:Me.LabelColor =200获得焦点及失去焦点时字段变更颜色。如果你的控件是文本框,名称为“txt字段”,写如下代码:Private Sub txt字段_GotFocus()Me.txt字段.BackColor =End Sub当中是灰色,你可以自己选择希望的颜色,如果想在失去焦点时改为原来的颜色,写如下代码:Private Sub txt字段_LostFocus()Me.txt字段.BackColor =End Sub使标签闪烁以引人注意设置窗体的TimerInterval 值为1000 (1秒).forms OnTimer 加入代码:Sub Form_Timer()YourTextLabel.Visible = Not YourTextLabel.VisibleEnd_Sub设置标签字体颜色:Me.Label1.ForeColor =设置文本框颜色:Me.TextColor = 300设置文本框字体颜色:Me.TextFontColor = 500标签等左边距离:Me.Label2.Left = 2200定位控件Me.控件.Top = 8290VBA编程Me. 控件.Left = 100标签等字体粗细: Me.Label2.FontWeight = 20000控件边框颜色:Me.Label2.BorderColor = 0
控件边框线条BorderStyle 属性使用以下设置:透明 0 (仅对于标签、图表和子报表而言是默认值)透明的实线 1 (默认值)实线虚线 2 虚线短虚线 3 短虚线点线 4 点线稀疏点线 5 点距较宽的点线点划线 6 虚线与点线组合的点划线点点划线 7 虚线-点线-点线组合的点点划线双实线 8 双实线指定控件的边框宽度使用 BorderWidth 属性可以指定控件的边框宽度取值:0或1-6
您可能关注的文档
- 985高校和电气工程及其自动化考研专业方向的学校排名及相关方分析剖析.doc
- 9万吨双氧水工艺管道、设备就位标书剖析.doc
- 9化学教案水的净化剖析.doc
- 9原材料汇总表剖析.doc
- 940说明书剖析.doc
- 9个方法,助你高效地过好每一天剖析.pptx
- 9国家重点研发计划专项项目申请书模板剖析.doc
- 8.2南方地区剖析.pptx
- 9年级10月语文试题剖析.doc
- 9分达人阅读AmateurNaturalists精读笔记剖析.doc
- 浙江金华市公共资源交易中心永康市分中心编外人员招考聘用笔试历年典型考题及考点研判与答案详解.docx
- 浙江宁波慈溪市政协办公室招考聘用编外工作人员笔试历年典型考题及考点研判与答案详解.docx
- 浙江金华永康市西溪镇人民政府招考聘用笔试历年典型考题及考点研判与答案详解.docx
- 福建南平市公安局建阳分局招考聘用辅警笔试历年典型考题及考点研判与答案详解.docx
- 浙江嘉兴海盐县武原街道基层残疾人工作专职委员(公益岗位)招考聘用笔试历年典型考题及考点研判与答案详解.docx
- 浙江宁波知识产权保护中心招考聘用工作人员笔试历年典型考题及考点研判与答案详解.docx
- 浙江杭州建德市面向2024届普通高校毕业生招考聘用教师(第二批)16人笔试历年典型考题及考点研判与答案详解.docx
- 浙江省台州中学面向2024届普通高校毕业生招考聘用教师12人笔试历年典型考题及考点研判与答案详解.docx
- 湖北师范大学体育学院专任教师招考聘用笔试历年典型考题及考点研判与答案详解.docx
- 重庆市南岸区教育事业单位面向2024届高校毕业生招考聘用114人笔试历年典型考题及考点研判与答案详解.docx
文档评论(0)