设为首页
|
收藏本站
|
繁体中文
|
手机版
整站搜索
资讯
技巧
源码
行业
设备(待改)
资源
信息库(待改)
产品
作品(待改)
活动
培训(视频)
平台(待改)
二级(待改)
互动(作废)
交易
Access培训
-
Access开发平台
-
Access行业开发
首页
资讯
技巧
源码
行业
资源
活动
关于
资讯
公司动态
业界资讯
Access资讯
Excel资讯
Word资讯
PPT资讯
其它Office资讯
微软新闻
IT资讯
热门文章
未经同意私扫图书 Goog..
SQL注入的高级应用ACC..
朗科起诉索尼跨国专利案和解..
AMD推出Turion64..
质检总局:笔记本电池过热易..
发明专利仅占一成
最新文章
李开复:中国高校急需根据社..
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篇!
•
代码打开页面设置
热门文章
[2005-07-07]
微软中国向Linux动手 Linux成本高成为把柄
[2006-08-23]
段永平:照巴菲特说的做
[2006-11-24]
传台湾新浪将出售 新浪官方并未否认
[2006-09-28]
开启理想之门:神州数码总裁与你面对面直播实录
[2006-10-29]
用vb与sql server如何实现登录密码的修改?
[2006-07-27]
江西移动基于IT资源管理成功案例
热门产品