ACCESS 与 VBA
ACCESS-VBA 编程
骨曰切,象曰磋,玉曰琢,石曰磨,乃成宝器.人之学问知能成就,犹骨象玉石切磋琢磨也. gfuuyygy@163.com
二次排版:Johnsonfung@tom.com
1
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 Integer Dim intReportControls As Integer intFormControls = Forms!Employees.Count intReportControls = Reports!FreightCharges.Count 设置控件可见性 Dim i, ii As Integer For ii = 3 To 10 Me.Controls.Item(ii).Visible = True Next For i = 11 To 22 Me.Controls.Item(i).Visible = False Next 按特殊名在 VBA 中设置控件的可见性: For i = 27 To 47 If Me.Controls.Item(i).Name Like "A*" Then 2
ACCESS 与 VBA
Me.Controls.Item(i).Visible = False End If Next 指定一个控件能否接受焦点 Enabled 属性: me.控件.Enabled = true'能 =false'不能 指定一个控件能否被编辑: locked 如: me.控件.Locked = true me.控件.Locked = false 设置控件标题显示的文字 Me.控件.Caption = "显示窗体" 设置标签颜色: Me.LabelColor =200 获得焦点及失去焦点时字段变更颜色. 如果你的控件是文本框,名称为"txt 字段" ,写如下代码: Private Sub txt 字段_GotFocus() Me.txt 字段.BackColor = 12632256 End Sub 当中"12632256"是灰色,你可以自己选择希望的颜色,如果想在失去焦点时改为原来的颜色,写如下代 码: Private Sub txt 字段_LostFocus() Me.txt 字段.BackColor = 16777215 End Sub 使标签闪烁以引人注意 设置窗体的 TimerInterval 值为 1000 (1 秒). forms OnTimer 加入代码: Sub Form_Timer() YourTextLabel.Visible = Not YourTextLabel.Visible End_Sub 设置标签字体颜色: Me.Label1.ForeColor = 设置文本框颜色: Me.TextColor = 300 设置文本框字体颜色: Me.TextFontColor = 500 标签等左边距离: Me.Label2.Left = 2200 定位控件 Me.控件.Top = 8290 Me. 控件.Left = 100 标签等字体粗细: Me.Label2.FontWeight = 20000 控件边框颜色: Me.Label2.BorderColor = 0 3
- 身份证号校验位 > ACCESSVBA编程
-
ACCESSVBA编程
下载该文档 文档格式:PDF 更新时间:2005-11-01 下载次数:11219 点击次数:13文档基本属性 文档语言: 文档格式: pdf 文档作者: 关键词: 主题: 备注: 点击这里显示更多文档属性 经理: 单位: 分类: 创建时间: 上次保存者: 修订次数: 编辑时间: 文档创建者: 修订: 加密标识: 幻灯片: 段落数: 字节数: 备注: 演示格式: 上次保存时间:
- 下载地址 (推荐使用迅雷下载地址,速度快,支持断点续传)
- PDF格式下载
- 更多文档...
-
上一篇:ACCESSVBA编程
下一篇:北京市中小学管理信息系统
点击查看更多关于身份证号校验位的相关文档
- 您可能感兴趣的
- 身份证号校验位不正确 身份证校验位 身份证校验位错误 奇偶校验位 什么是校验位 串口通讯校验位设置 校验位 杨旭的身份证号 李浩的身份证号
- 大家在找
-
- · 华为adsl猫mt880故障
- · 黄帝内经使用手册3
- · 固定式升降台
- · 2013考研英语词汇书
- · 50分贝的声音有多大
- · 半导体物理施敏
- · photoshop注册码
- · protel99教程pdf
- · 轻钢结构厂房定额造价
- · youletmeknow
- · imissyou是谁唱的
- · 复旦大学药学院考研
- · 酒店客房部经理职责
- · 快播v3.51太平洋下载
- · 微积分下期末试卷
- · icu病房
- · 给未来班主任的一封信
- · 亚当斯密图像
- · 上海小方纸币每日报价
- · 电子书初级会计电算化广东省
- · 百张男性生殖器照片
- · 泉视界唱歌拼输赢
- · acdsee5.0许可证号
- · 数控台式钻床
- · officepdf插件
- · 二次元影像测量仪视频
- · 上箭头拖动条下箭头
- · 历年申论试题及答案
- · 2011造价员考试时间
- · 无锡市人民政府办公室(2002)171号文件
- 赞助商链接