以文本方式查看主题
-
Foxtable(狐表)
(http://www.foxtable.com/bbs/index.asp)
--
专家坐堂
(http://www.foxtable.com/bbs/list.asp?boardid=2)
----
[已解决] 文本框为空时如何自动从组合框取值
(http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=114733)
-- 作者:hrlong
-- 发布时间:2018/2/18 20:11:00
-- [已解决] 文本框为空时如何自动从组合框取值
此主题相关图片如下:qq图片20180218200425.png
验货时,要输入验货员工,验货订单号和验货结果;因固定岗位固定时段验货员工不变,所以验货输入窗口的员工不需要变,但是每次完成一次验货后,三个框的值就会清除,要重新输入。
经某个前辈提醒,采用此文本框的值为空时,自动从上个窗口的组合框取值,用这样的方式;请问这个取值的代码要怎么写?
[此贴子已经被作者于2018/2/18 21:23:45编辑过]
-- 作者:hrlong
-- 发布时间:2018/2/18 21:26:00
--
参考了这个的例子,http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=15241
Dim cm As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim dr As DataRow = cm.SelectedItem
If dr IsNot Nothing Then
Tables("验货").current("验货员工") = dr("姓名")
End If
把值直接返到了表格中