完整word版-ACCESS组合框技巧

Access 是一个既可以只用来存放数据的数据库，也可以作为一个客户端开发工具来进行数据库应用系统开发；即可以开发方便易用的小型软件，也可以用来开发大型的应用系统。（1）存储方式简单，易于维护管理 ，界面友好、易操作 （2）面对对象 Access 是一个面对对象的开发工具（3）集成环境、处理多种数据信息 （4）Access 支持 ODBC（开发数据库互连）（5）支持广泛，易于扩展，弹性较大正 文:组合框使用技巧一、只能选择而不能修改数据 Private Sub 组合框名称_KeyDown(KeyCode As Integer, Shift As Integer) DoCmd.CancelEvent End Sub 注：在“键按下”事件中写入代码即可二、消除不在列表中告警 Private Sub 组合框名称_NotInList(NewData As String, Response As Integer) Response = 0 End Sub 注：在“不在列表中”事件中写入代码即可三、不在列表中,清空其数据并不移动光标 Private Sub 组合框名称_NotInList(NewData As String, Response As Integer) Response = acDataErrContinue Me. 组合框名称= Null Me. 组合框名称.Requery End Sub四、调整，“箭头”满框正常的组合框，在其右边有一个小箭头，点击这个小箭头，会出现组合框的内容列表。但假如设计不好，可能会出现“箭头”不能填满只占组合框的一部分的现象，很难看的。解决办法很简单－－在窗体设计视图下，选中组合框，先设置你需要的字号，默认是 9 号字，改成你需要的大小字号（在 14 号字内）。然后，按住“shift”键，再用小键盘区的上下箭头键进行微量调整，“箭头”就会根据字号大小而自动调整，立马会出现你需要的效果。五、默认值为该组合框行来源的最后一行 1）、在窗体的加载事件中写： Dim n As Long n = Me. 组合框名称.ListCount Me. 组合框名称.value = Me. 组合框名称.Column(0, n - 1) 2）Me. 组合框名称= Me. 组合框名称.ItemData(Me. 组合框名称.ListCount-1) 六、默认值为该组合框行来源的第一条记录 1）在窗体加载事件中写上以下代码 Me.组合框名称 = Me.组合框名称.ItemData(0) 注：ItemData(n) 其中 n 是要作为默认值的所在行号。ItemData 属性是从零开始的，所以假如要使用列表中第一行为默认值，请键入：ItemData(0)。 2）在窗体加载事件中写上以下代码 Me.组合框名称 = Me.组合框名称.Column(0, 0) 3）在组合框的默认值属性中直接放下列表达式： =[组...