Foxtable(狐表)用户栏目专家坐堂 → 窗口数据自动输入问题


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

主题:窗口数据自动输入问题

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


加好友 发短信
等级:三尾狐 帖子:632 积分:3619 威望:0 精华:0 注册:2011/5/21 18:05:00
窗口数据自动输入问题  发帖心情 Post By:2023/5/3 16:24:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:jxf_2023-05-03_16-20-37.png
图片点击可在新窗口打开查看

程序如上,为什么双击之后窗口可以正常打开,但是数据无法加载!

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/3 16:27:00 [只看该作者]

什么类型的窗口?控件有没有绑定列?

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


加好友 发短信
等级:三尾狐 帖子:632 积分:3619 威望:0 精华:0 注册:2011/5/21 18:05:00
  发帖心情 Post By:2023/5/3 16:28:00 [只看该作者]

控件没有绑定列,独立窗口!

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/3 17:47:00 [只看该作者]

加上e.cancel=true

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


加好友 发短信
等级:三尾狐 帖子:632 积分:3619 威望:0 精华:0 注册:2011/5/21 18:05:00
  发帖心情 Post By:2023/5/4 8:14:00 [只看该作者]


此主题相关图片如下:jxf_2023-05-04_08-11-02.png
按此在新窗口浏览图片

‘单元格双击代码如下,去掉if语句后,打开窗口还是一样,但是关闭窗口的时候报错
Dim id As String = e.Row("_Identify")
Dim rq As Date = e.Row("日期")
Dim bm As String = e.Row("部门")
Dim lqry As String = e.Row("员工")
Dim cppc As String = e.Row("产品批次")
Dim cpbh As String = e.Row("产品编号")
Dim gxap As String = e.Row("加工工序")
Dim lqsl As Integer = e.Row("领取数量")
e.cancel = true
Forms("任务修改").open()
If Forms("任务修改").Opened Then
    Forms("任务修改").Controls("id").Text = id
    Forms("任务修改").Controls("日期").Value = rq
    Forms("任务修改").Controls("接收部门").value = bm
    Forms("任务修改").Controls("领取人员").value = lqry
    Forms("任务修改").Controls("产品批次").value = cppc
    Forms("任务修改").Controls("产品编号").value = cpbh
    Forms("任务修改").Controls("工序安排").value = gxap
    Forms("任务修改").Controls("领取数量").value = lqsl 
End If

加上e.cancel=true后,还是一样,窗口可以打开,但是数据无法加载。

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/4 8:36:00 [只看该作者]

我测试没有问题,请上传实例说明

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


加好友 发短信
等级:三尾狐 帖子:632 积分:3619 威望:0 精华:0 注册:2011/5/21 18:05:00
  发帖心情 Post By:2023/5/4 8:48:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.foxdb


您测试一下,我这边一直不成功!

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/5/4 8:57:00 [只看该作者]

这个是模式窗口,不是独立窗口。模式窗口赋值的代码放到窗口afterload事件里

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


加好友 发短信
等级:三尾狐 帖子:632 积分:3619 威望:0 精华:0 注册:2011/5/21 18:05:00
  发帖心情 Post By:2023/5/4 10:35:00 [只看该作者]

收到,谢谢!

 回到顶部