- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]新增 删除代码问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52558)
-- 发布时间：2014/6/18 10:24:00
-- [求助]新增 删除代码问题
有个 增新表 绑定到窗体
问题1：我是先在NumericComboBox1控件输入要增加的行数 然后点增加记录按钮 则增加那么多行 同时增加行 入款方式那一列的值等于ComboBox1控件的值
代码这样写提示出错 怎么改？
问题2：窗体上删除按钮 我是想实现选定区域的所有行删除
代码如下：
With Tables("新增表")
For i As Integer = .TopPosition To .BottomPosition
.Rows(i).Delete
Next
End With
选定一行删除没问题 选定多行删
此主题相关图片如下：2.png
此主题相关图片如下：3.png
此主题相关图片如下：1.jpg
除提示出错 代码哪里有问题了吗 我是看代码简介里都是这样写的
此主题相关图片如下：2.png此主题相关图片如下：3.png此主题相关图片如下：1.jpg除提示出错 代码哪里有问题了吗 我是看代码简介里都是这样写的
-- 发布时间：2014/6/18 10:25:00
--
ADDNEW 并不会返回新增行的集合哦. 只会返回一行而已.
-- 发布时间：2014/6/18 10:26:00
--
For Each i As Integer = 1 To dd
Dim r As Row = Tables("XX").addnew
r("XX")="XX"
Next
改为这样
-- 发布时间：2014/6/18 10:36:00
-- 语法错误？
按那个 改了下 语法错误？
此主题相关图片如下：4.png
-- 发布时间：2014/6/18 10:36:00
--
For i As Integer = 1 To dd
Dim r As Row = Tables("XX").addnew
r("XX")="XX"
Next
-- 发布时间：2014/6/18 10:38:00
--
手误
For i As Integer = 1 To dd Dim r As Row = Tables("XX").addnew r("XX")="XX" Next |
-- 发布时间：2014/6/18 10:46:00
-- 嗯~ 这个可以了
能不能麻烦在看下这个删除代码哪里写错了
窗体上删除按钮 我是想实现选定区域的所有行删除
代码如下：
With Tables("新增表")
For i As Integer = .TopPosition To .BottomPosition
.Rows(i).Delete
Next
End With
删除一行没问题 选定多行删除提示出错
此主题相关图片如下：1.jpg
此主题相关图片如下：1.jpg-- 发布时间：2014/6/18 10:48:00
--
With Tables("新增表")
For i As Integer =.BottomPosition to .TopPosition step -1
.Rows(i).Delete
Next
End With
-- 发布时间：2014/6/18 14:39:00
-- 疑问
删除代码解决~麻烦下 在帮我看个问题
底下表格是绑定新增表 上面表格是绑定存款表
在新增表中增加记录填写数据 想实现点保存按钮 将新增表中的数据保存到存款表中 并清空新增表里面的内容
代码如下：
For Each dt As Row In Tables("新增表").Rows
Dim dr As Row =Tables("存款表").AddNew
dr("记账日")=dt("记账日")
dr("交易时间")=dt("交易时间")
dr("交易地点")=dt("交易地点")
dr("支出")=dt("支出")
dr("收入")=dt("收入")
dr("账户余额")=dt("账户余额")
dr("对方帐号")=dt("对方帐号")
dr("对方户名")=dt("对方户名")
dr("币种")=dt("币种")
dr("摘要")=dt("摘要")
dr("入款方式")=dt("入款方式")
dt.Delete
Next
但是出错~ 提示对方帐号不属于存款表
我查看了存款表的表结构 有对方帐号这个字段啊？求大神 看看是什么原因
此主题相关图片如下：1.png
此主题相关图片如下：2.png
此主题相关图片如下：4.png
此主题相关图片如下：1.png此主题相关图片如下：2.png此主题相关图片如下：4.png-- 发布时间：2014/6/18 14:41:00
--
存款表 没有 对方账号 这个列吧. 看看是不是名称搞错了