Foxtable(狐表)用户栏目专家坐堂 → 传统编辑方式


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

主题:传统编辑方式

美女呀,离线,留言给我吧!
姗姗来迟
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:58 积分:483 威望:0 精华:0 注册:2011/11/14 13:38:00
传统编辑方式  发帖心情 Post By:2011/11/24 10:41:00 [只看该作者]

条件:一个表里面有10列

        分成二个窗口每个窗口里面各分担5列的录入  窗口1  窗口2

        建立二个传统编辑方式录入窗口  传统编辑方式录入窗口1  传统编辑方式录入窗口2

问题:当打开窗口1时双击单元格会弹出传统编辑方式录入窗口1对前5列进行录入

        当打开窗口2时双击单元格会弹出传统编辑方式录入窗口2对后5列进行录入

 

 

 

    这是双击单元格代码  Forms("").Open()  如何更改代码可以实现上面的要求请求帮助 亲亲


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


加好友 发短信
等级:童狐 帖子:252 积分:2193 威望:0 精华:0 注册:2011/6/28 16:50:00
  发帖心情 Post By:2011/11/24 11:18:00 [只看该作者]

加判断,大致如下:

If Forms("窗口1").Opened Then
    Forms("录入窗口1").Open() 

End If

If Forms("窗口2").Opened Then
    Forms("录入窗口2").Open() 

End If


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


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/11/24 11:23:00 [只看该作者]

Select Case e.col.name
    Case "第一列","第二列","第三列","第四列","第五列"
        forms("窗口1").Open()
    Case "第六列","第七列","第八列","第九列","第十列"
        forms("窗口1").Open()
End Select

 


 回到顶部
美女呀,离线,留言给我吧!
姗姗来迟
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:58 积分:483 威望:0 精华:0 注册:2011/11/14 13:38:00
  发帖心情 Post By:2011/11/24 11:26:00 [只看该作者]

谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
小猪鑫鑫
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:832 积分:5867 威望:0 精华:6 注册:2011/5/27 11:41:00
  发帖心情 Post By:2011/11/24 22:27:00 [只看该作者]

楼主的好问题,狐爸的好答案,学习

 回到顶部