设为首页
|
收藏本站
|
繁体中文
|
手机版
整站搜索
资讯
技巧
源码
行业
设备(待改)
资源
信息库(待改)
产品
作品(待改)
活动
培训(视频)
平台(待改)
二级(待改)
互动(作废)
交易
Access培训
-
Access开发平台
-
Access行业开发
首页
资讯
技巧
源码
行业
资源
活动
关于
资讯
公司动态
业界资讯
Access资讯
Excel资讯
Word资讯
PPT资讯
其它Office资讯
微软新闻
IT资讯
热门文章
Google收购YouTu..
方正集团董事长魏新:呼唤创..
"最受赞赏的中国..
美拟进行超新星加速度实验探..
联合证券研究所:IT专业连..
网通IPTV一年发展6万多..
最新文章
李开复:中国高校急需根据社..
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-11-14]
中国酝酿手机行业标准化 手机像电脑DIY
[2006-10-23]
全球IT巨头伟创力集团来深圳设立研发中心
[2005-12-25]
网络传销披电子商务外衣 每年敛财两千万
[2006-08-20]
如何进行有效的IT基础设施规划
[2005-09-02]
微软将加入网络电话竞赛 打通即时与传统用户
[2006-08-09]
联想首推奥运机型 借奥运展大客户体系
热门产品