以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [已解决] 文本框为空时如何自动从组合框取值  (http://foxtable.net/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

把值直接返到了表格中