Access交流网
  • 设为首页|收藏本站|繁体中文|手机版
  •     
  • Access培训-Access开发平台-Access行业开发

  • 首页
  • 资讯
  • 技巧
  • 源码
  • 行业
  • 资源
  • 产品
  • 活动
  • 培训
  • 招聘
  • 论坛
  • 商城
  • 关于

资讯

公司动态
业界资讯

Access资讯

Excel资讯

Word资讯

PPT资讯

其它Office资讯

微软新闻

IT资讯

热门文章

  • 搜狐和阿迪达斯结为合作伙伴..
  • 神州数码与你面对面直播实录
  • 联想首推奥运机型 借奥运展..
  • 进化还是消亡:个人电脑业必..
  • 追查惠普“深喉”:当商业利..
  • AMD看淡多核心的扩展 计..

最新文章

  • 李开复:中国高校急需根据社..
  • VBA编程常用语句300句
  • SQL基础:常用SQL语句..
  • ACCESS学习日记
  • 多表查询技巧
  • Oracle数据库EXP、..

联系方式

Access交流网

电  话:0760-88315075
热  线:0760-88315075

邮  编:528463
咨询QQ:1918333016
营销QQ:4008553990

Email:1918333016@qq.com

网  址: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-23] IT观察:现在提CDMA将成为联通的弃儿还为时尚早access数据库
  • [2006-11-19] 4年一见AMD缺货冲击波 英特尔将降价反击access数据库
  • [2006-08-03] 甲骨文与惠普联合发布“参考配型”access数据库
  • [2005-07-04] 长虹携微软成立“虹微” “破冰”IC开发access数据库
  • [2006-04-10] 三部委联合发文 PC必须预装正版操作系统access数据库
  • [2006-10-11] 美PS3将可能赠送一张蓝光电影access数据库

热门产品

  1. Access通用开发平台

    Access通用开发平台

  2. 电子厂管理软件系统

    电子厂管理软件系统

  3. 短信专家接口(可用于企业及个人多种短信用途)

    短信专家接口(可用于企业及个人多种短信用途)

公司动态|在线留言|在线反馈|联系我们|友情链接|会员中心|站内搜索|网站地图

中山市天鸣科技发展有限公司 版权所有 1999-2018 粤ICP备10043721号

广东省中山市西苑广场富贵阁20楼A座

电话:0760-88315075 手机:13928102596 QQ:1918333016

Access应用 Access培训 Access开发 Access平台

access|数据库|access下载|access教程|access视频|access软件

Powered by MetInfo 5.3.12 ©2008-2022  www.metinfo.cn