以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口数据空白  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=108452)
--  作者：有点甜
--  发布时间：2017/10/23 13:33:00
--  

1、afterload事件

 

DataTables("临时表").DataRows.Clear

 

保存按钮 http://www.foxtable.com/webhelp/scr/0680.htm

 

2、不能手动输入的控件，设置成只读或者不可用；不能手动输入的表列，列属性设置成不可编辑。
--  作者：有点甜
--  发布时间：2017/10/23 15:03:00
--  
以下是引用nuoyan88在2017/10/23 14:18:00的发言：
请问毛坯编码处内容变更其他的项怎么能自己新增引用表中呢？因为毛坯编码我想用扫描枪扫，只要毛坯编码一扫相应控件的内容跟着自动新增呢？谢谢

 

你本来不就弄好了这个功能？在DataColChanged你写了事件代码，输入编码后，其余几列就引用了数据出来。
--  作者：有点甜
--  发布时间：2017/10/23 16:15:00
--  

新增按钮，参考代码

 

Dim t As Table = Tables("表A")
Dim cs() As String = {"第一列", "第二列", "第三列"}
Dim r As Row = t.current
If r Is Nothing Then
    Dim nr As Row = t.addnew
Else
    Dim nr As Row = t.addnew
    For Each c As String In cs
        nr(c) = r(c)
    Next
End If