设为首页
|
收藏本站
|
繁体中文
|
手机版
整站搜索
资讯
技巧
源码
行业
设备(待改)
资源
信息库(待改)
产品
作品(待改)
活动
培训(视频)
平台(待改)
二级(待改)
互动(作废)
交易
Access培训
-
Access开发平台
-
Access行业开发
首页
资讯
技巧
源码
行业
资源
活动
关于
资讯
公司动态
业界资讯
Access资讯
Excel资讯
Word资讯
PPT资讯
其它Office资讯
微软新闻
IT资讯
热门文章
完美性价双核组合 ——威盛..
SQL Outer Join
创维朗科开创商业盈利新模式
方兴东预言中国新媒体发展速..
首款鼠标性能测试软件“鼠青..
多表查询技巧
最新文章
李开复:中国高校急需根据社..
VBA编程常用语句300句
SQL基础:常用SQL语句..
ACCESS学习日记
多表查询技巧
Oracle数据库EXP、..
联系方式
Access交流网(免费Access交流)
QQ:18449932
网 址:
www.access-cn.com
当前位置:
首页
>
资讯
>
业界资讯
>
IT资讯
IT资讯
如何通过代码判断一条记录是否被选择
选择代码可以使用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
发布人:Grant-IT学院
分享到:
点击次数:
更新时间:2006-11-21 22:37:37 【
打印此页
】 【
关闭
】
上一篇:
Dell惠普刺激1GB内存市场极速成长
下一篇:
ACCESS 用链接表方法链SQL SERVER
相关文章
•
李开复:中国高校急需根据社会需求培养学生
•
VBA编程常用语句300句
•
SQL基础:常用SQL语句详解 (转)
•
ACCESS学习日记
•
多表查询技巧
•
Oracle数据库EXP、IMP命令语句使用方法
•
SQL注入的高级应用ACCESS篇!
•
代码打开页面设置
热门文章
[2006-08-20]
如何进行有效的IT基础设施规划
[2006-08-05]
领域信息化进程与IT服务商角色定位高峰论坛召开
[2006-09-15]
质检总局:笔记本电池过热易起火 用户要注意
[2006-08-05]
阚大炮再轰WAPI必死无疑 产业联盟逐一反击
[2006-08-25]
DoCoMo售日本首款HSDPA手机 下载速度快10倍
[2006-03-31]
600多家公司不满现状 结盟反抗Google百度
热门产品