Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口设置关联表鼠标焦点问题?谢谢帮助!


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

主题:[求助]窗口设置关联表鼠标焦点问题?谢谢帮助!

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


加好友 发短信
等级:幼狐 帖子:58 积分:571 威望:0 精华:0 注册:2016/12/24 9:59:00
[求助]窗口设置关联表鼠标焦点问题?谢谢帮助!  发帖心情 Post By:2017/6/23 11:22:00 [只看该作者]

设计窗口有2张关联表,客户和客户联系人,窗口增加一个命令按钮:单击新增加新的客户联系人,想要增加一行后把鼠标放到联系人姓名单元格里面,想要请教这个功能如何实现?谢谢各位大侠!谢谢有点色老师经常指点!

程序如下:
Dim r As Row = Tables("往来方联系人_联系人表").AddNew()     '增加一个新的客户联系人
If CurrentTable.Name = "往来方联系人_客户表" Then               '如果当前表客户
    Dim u As Row = Tables("往来方联系人_客户表").Current      '当前客户存在
      If u IsNot Nothing Then
        r("往来方客户") = u("客户名称")                                     '客户新增联系人对应的客户名称是当前客户的名称
      End If
End If
Forms("往来方联系人").Open()
r.Save()   
                                                                                       '还需要鼠标回到("往来方联系人_联系人表")中的新增行联系人姓名列

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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/6/23 12:15:00 [只看该作者]


 回到顶部