选择代码可以使用docmd.runcommand accmdselectrecord,但如何通过代码判断一条记录是否被选择呢 me.CurrentRecord和me.SelTop 和 me.SelHeight 和 me.SelWidth me.CurrentRecord 得到当前记录数 me.SelTop 判断 当前被高亮选中的最小记录号 me.SelHeight =1 表示 1个记录被选中 me.SelWidth=字段数 表示一个记录的内容全部被选中 ------------------------- 例子,假设字段数为 4 With Me.表1_子窗体.Form If .SelHeight > 0 And .SelWidth = 4 Then MsgBox "当前记录号:" & .CurrentRecord & vbCr & "当前整行选中的记录:" & .SelTop & "->" & (.SelTop + .SelHeight - 1) End If End With |
|站长邮箱|小黑屋|手机版|Office中国/Access中国
( 粤ICP备10043721号-1 )
GMT+8, 2025-4-2 12:53 , Processed in 0.077717 second(s), 16 queries .
Powered by Discuz! X3.3
© 2001-2017 Comsenz Inc.