Foxtable(狐表)用户栏目专家坐堂 → 录入凭证设计


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

主题:录入凭证设计

帅哥,在线噢!
有点蓝
  21楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/12 8:44:00 [显示全部帖子]

if r is nothing then r = DataTables("缴费情况").addnew

 回到顶部
帅哥,在线噢!
有点蓝
  22楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/12 10:21:00 [显示全部帖子]

报什么错?我测试没有问题

 回到顶部
帅哥,在线噢!
有点蓝
  23楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/12 10:32:00 [显示全部帖子]

没有复制说明车牌号相同,肯定就不添加数据了

 回到顶部
帅哥,在线噢!
有点蓝
  24楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/12 13:43:00 [显示全部帖子]

要两个条件同时并存,find查询添加多一个单号条件咯

 回到顶部
帅哥,在线噢!
有点蓝
  25楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 11:03:00 [显示全部帖子]

DataRows是一个集合,不是一行,SQLSelect返回也也是一个集合,而不是只一行

 回到顶部
帅哥,在线噢!
有点蓝
  26楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 11:33:00 [显示全部帖子]

Dim r As DataRow = Forms("月租收费").Controls("Table1").Table.current.DataRow

 回到顶部
帅哥,在线噢!
有点蓝
  27楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 13:32:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  28楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 13:48:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  29楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 14:10:00 [显示全部帖子]

死脑筋,没办法

For Each 
r As Row In Tables("订单").Rows
  对每一行的处理

Next

For Each dr As DataRow In DataTables("订单").DataRows
   
对每一行的处理
Next

 回到顶部
帅哥,在线噢!
有点蓝
  30楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/27 16:11:00 [显示全部帖子]

无语

for each r As Row in Forms("月租收费").Controls("Table1").Table.Rows

 回到顶部
总数 33 上一页 1 2 3 4 下一页