access_vba编程.pdfVIP

A C C E S S 与 V B A ACCESS－VBA 编程 ACCESS－VBA 编程 骨曰切，象曰磋，玉曰琢，石曰磨，乃成宝器。人之学问知能成就，犹骨象玉石切磋琢磨也。 gfuuyygy@163.com 二次排版：Johnsonfung@ 1 A C C E S S 第1章 控 件 与 V 常量 控件 B acBoundObjectFrame 绑定对象框 A 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 A C Me.Controls.Item(i).Vi