Foxtable(狐表)用户栏目专家坐堂 → [求助]代码代开内置输入器


  共有3064人关注过本帖树形打印复制链接

主题:[求助]代码代开内置输入器

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/20 16:17:00 [显示全部帖子]

1、焦点放到日期列或者日期控件;

 

2、执行代码 Sendkeys.Send("{f4}")

 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/20 21:51:00 [显示全部帖子]

afterSelChanged事件

 

Dim c As Col = e.Table.Cols(e.NewRange.ColSel)
If c.name="第四列" Then
    Sendkeys.Send("{f4}")
End If


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/11/18 21:37:00 [显示全部帖子]


 回到顶部