Office中国论坛/Access中国论坛

标题: 如何控制窗体主体的增加行数？ [打印本页]

作者: XWQ2000 时间: 2006-1-24 21:23
标题: 如何控制窗体主体的增加行数？
我设计一个窗体，主体为添加数据。已知有10个数据要添加。请问如何才能设定当添加到10个数据后不再添加数据

作者: fan0217 时间: 2006-1-24 21:25
先判定记录集的记录数量，如果达到10个记录，就禁止添加记录。

作者: XWQ2000 时间: 2006-1-24 21:35
是否能给我一个例子谢谢

作者: fan0217 时间: 2006-1-24 21:37
把你的例子放上来，我给你看看。

作者: XWQ2000 时间: 2006-1-24 21:49
标题: 回复：（XWQ2000）如何控制窗体主体的增加行数？
[attach]15559[/attach]

作者: fan0217 时间: 2006-1-24 22:13
在窗体的成为当前事件中写下以下代码：

Private Sub Form_Current()
Dim rs As Recordset
Dim a As Integer

Set rs = Me.Recordset

a = rs.RecordCount

If a < 10 Then
Me.AllowAdditions = True
Else
Me.AllowAdditions = False
End If
End Sub

作者: XWQ2000 时间: 2006-1-25 01:57
谢谢了

作者: zhangxj825 时间: 2006-1-25 22:43
谢谢了

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)