Foxtable(狐表)用户栏目专家坐堂 → 窗口数据空白


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

主题:窗口数据空白

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/23 13:33:00 [显示全部帖子]

1、afterload事件

 

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

 

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

 

2、不能手动输入的控件,设置成只读或者不可用;不能手动输入的表列,列属性设置成不可编辑。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/10/23 15:03:00 [显示全部帖子]

以下是引用nuoyan88在2017/10/23 14:18:00的发言:
请问毛坯编码处内容变更其他的项怎么能自己新增引用表中呢?因为毛坯编码我想用扫描枪扫,只要毛坯编码一扫相应控件的内容跟着自动新增呢?谢谢

 

你本来不就弄好了这个功能?在DataColChanged你写了事件代码,输入编码后,其余几列就引用了数据出来。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By: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


 回到顶部