以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  变量  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113562)

--  作者:wei0769
--  发布时间:2018/1/18 14:02:00
--  

事件在那里写?看下直接引用 combolist

 

 


图片点击可在新窗口打开查看此主题相关图片如下:10.jpg
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2018/1/18 14:26:00
--  

判断一下

 

If t.current Is Nothing Then

    msgbox("表格没数据")

    return

End If


--  作者:有点甜
--  发布时间:2018/1/18 15:03:00
--  

 

Dim t As Table = Tables("工序跟踪表")
If t.current Is Nothing Then
    msgbox("表格没数据")   
    Return
End If

MessageBox.Show(1)
Dim filter As String = "成品编码 = \'" & t.current("成品编码") & "\' and 生产批次 = \'" & t.current("生产批次") & "\'"
MessageBox.Show(2)
e.Sender.ComboList = DataTables("生产排产表").SQLGetComboListString("加工工序", filter)
MessageBox.Show(3)

[此贴子已经被作者于2018/1/18 15:03:18编辑过]