Foxtable(狐表) → 用户栏目 → 专家坐堂 → 复选框


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

主题：复选框
帅哥哟，离线，有人找我吗？
outcat
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：470 积分：3641 威望：0 精华：0 注册：2017/11/5 14:47:00 		复选框  发帖心情 Post By：2019/11/10 13:08:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下：11111.png
图片点击可在新窗口打开查看

老师，这个切换类别后，记住选中 复选框的状态呢，需要在哪块加代码呢
 回到顶部
帅哥哟，离线，有人找我吗？
outcat
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：470 积分：3641 威望：0 精华：0 注册：2017/11/5 14:47:00 		  发帖心情 Post By：2019/11/11 9:10:00 [显示全部帖子]

Dim lst As new List(of String)
For Each r As Row In Tables("导入商品_Table1").GetCheckedRows
   lst.add(r("_Identify")) 
    If Forms("新增商品采购").opened Then
        Dim r11 As Row = Tables("采购明细表").AddNew
        Dim r12 As Row = Tables("采购总表").Current
        r11("日期") = r12("日期")
        r11("供应商") = r12("供应商")
        r11("采购单号") = r12("采购单号")
        r11("采购员") = r12("采购员")
        r11("登记人") = r12("登记人")
        r11("仓库名称") = r12("仓库名称")
        r11("商品类别") = r("二级类别")
        r11("类别编号") = r("二级编号")
        r11("商品编号") = r("商品编号")
        r11("商品名称") = r("商品名称")
        r11("规格") = r("规格")
        r11("型号") = r("型号")
        r11("单位") = r("单位")
        r11("单价") = r("单价")
    End If
Next
e.Form.close            

老师，这是我 导入  里的代码，加入了你的代码，还是不行，一直是最后选择的那几个商品
 回到顶部
帅哥哟，离线，有人找我吗？
outcat
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：470 积分：3641 威望：0 精华：0 注册：2017/11/5 14:47:00 		  发帖心情 Post By：2019/11/11 9:48:00 [显示全部帖子]

那这个记住了勾选，我要最后一下子把记住勾选的行全部导入呀，可现在是一切换选择别的类的商品，勾选记录既取消了，这个还能怎么解决了，请老师明示

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05859 秒, 5 次数据查询