Foxtable(狐表) → 用户栏目 → 专家坐堂 → 自定义录入界面之四应用求助！！！


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

主题：自定义录入界面之四应用求助！！！
帅哥哟，离线，有人找我吗？
bluev
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：112 积分：1584 威望：0 精华：0 注册：2008/11/3 7:25:00 		自定义录入界面之四应用求助！！！  发帖心情 Post By：2017/6/23 20:57:00 [只看该作者]

If e.Selected Then '如果选择了值
    Dim tbl As Table = Tables("B_Table1")
Dim dj As WinForm.TextBox = Forms("1-A记录").Controls("TextBox-danjia")
    If tbl.Current IsNot Nothing Then
        e.Form.DropDownBox.Value = tbl.Current("批号")
Tables("A记录").Current("规格") = tbl.current("规格型号")
Tables("A记录").Current("数量") = tbl.current("实收数量")

    End If
    If e.Form.DropTable IsNot Nothing Then '如果是通过表下拉的
        e.Form.DropTable.FinishEditing()
    Else '如果是通过窗口下拉的
MessageBox.Show(1)
        e.Form.DropDownBox.WriteValue()
    End If
End If

代码这样写后 可以执行 但不填写 下拉列表框 了  “批号” 字段，其他字段填写正确！~
这是什么问题？ 不能这样用？ 

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


[此贴子已经被作者于2017/6/24 16:30:24编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

我测试帮助示例没有问题。是不是有其它事件代码影响了。上传实例看看

 回到顶部
帅哥哟，离线，有人找我吗？
bluev
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：112 积分：1584 威望：0 精华：0 注册：2008/11/3 7:25:00 		  发帖心情 Post By：2017/6/24 15:09:00 [只看该作者]

我是在帮助实例的基础上添加了 自定义录入界面之三 中的 选择多列数据 同时填入当前表中的代码 Tables("A记录").Current("数量") = tbl.current("实收数量")  没有这个代码运行就正常！！！

 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

"数量"列变化会触发什么事件吗

 回到顶部
帅哥哟，离线，有人找我吗？
bluev
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：112 积分：1584 威望：0 精华：0 注册：2008/11/3 7:25:00 		  发帖心情 Post By：2017/6/24 15:52:00 [只看该作者]

我把文件发到上面了，您给看看！
 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:窗口4.foxdb
 回到顶部
帅哥哟，离线，有人找我吗？
bluev
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：112 积分：1584 威望：0 精华：0 注册：2008/11/3 7:25:00 		  发帖心情 Post By：2017/6/24 16:34:00 [只看该作者]

改过数据库连接了，不好意思！！

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:窗口4.foxdb
 回到顶部
帅哥，在线噢！
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

一样的用法，看懂6楼用法

 回到顶部
帅哥哟，离线，有人找我吗？
bluev
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：112 积分：1584 威望：0 精华：0 注册：2008/11/3 7:25:00 		  发帖心情 Post By：2017/6/24 17:02:00 [只看该作者]

我这里测试还不不行的，新增加行，还是不填入数据！！！！

 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

我测试没有问题

 回到顶部
总数 12 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 7 次数据查询