| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 批量改变 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=92961) |
| -- 作者：yangwenghd -- 发布时间：2016/11/17 11:15:00 -- 批量改变 能帮忙看看这个吗？ 设计一个按钮 多行选中 然后点击按钮 把选中的 收款信息_开票状态 列改为 开票中 感谢 感谢 If e.Form.Controls("开票中").Text > "" Then Dim t As Table = e.Form.Controls("Table9").Table For i As Integer = t.BottomPosition To t.TopPosition Step -1 t.Rows(i)("收款信息_开票状态") = e.Sender.text Next End If \' |
| -- 作者：有点蓝 -- 发布时间：2016/11/17 11:22:00 -- If e.Form.Controls("开票中").Text > "" Then Dim t As Table = e.Form.Controls("Table9").Table For i As Integer = t.BottomPosition To t.TopPosition Step -1 t.Rows(i)("收款信息_开票状态") = e.Form.Controls("开票中").Text Next End If
|
| -- 作者：yangwenghd -- 发布时间：2016/11/17 11:28:00 -- 如果在输入时间和清楚内容呢？ 比如选中后，出了改变开票列 然后在 开票日期 输入当天的日期 然后在清除选中行 送货日期 的内容 感谢 感谢
|
| -- 作者：有点蓝 -- 发布时间：2016/11/17 11:32:00 -- If e.Form.Controls("开票中").Text > "" Then Dim t As Table = e.Form.Controls("Table9").Table For i As Integer = t.BottomPosition To t.TopPosition Step -1 t.Rows(i)("收款信息_开票状态") = e.Form.Controls("开票中").Text t.Rows(i)("开票日期") = date.now t.Rows(i)("送货日期") = nothing Next End If
|
| -- 作者：yangwenghd -- 发布时间：2016/11/17 11:37:00 -- 显示找不到 开票中 控件 ， 如果不要那个控件该怎么改啊 |
| -- 作者：有点青 -- 发布时间：2016/11/17 11:41:00 --
t.Rows(i)("收款信息_开票状态") = "开票中"
|
| -- 作者：yangwenghd -- 发布时间：2016/11/17 12:14:00 -- 谢谢 软件是我控件有问题， 我就是想 在 Table1选中几行，然后点击按钮，把选中的 开票状态 列 输入 开票中 感谢 感谢
|
| -- 作者：有点青 -- 发布时间：2016/11/17 12:20:00 -- Dim t As Table = e.Form.Controls("Table9").Table For i As Integer = t.BottomPosition To t.TopPosition Step -1 t.Rows(i)("收款信息_开票状态") = "开票中" t.Rows(i)("开票日期") = Date.now t.Rows(i)("送货日期") = Nothing Next |
| -- 作者：yangwenghd -- 发布时间：2016/11/19 18:47:00 -- Dim t As Table = Tables("英语") For i As Integer = t.BottomPosition To t.TopPosition Step -1 t.Rows(i)(“开票_状态”) = "开票中" t.Rows(i)("送货_状态") = "开票中" Next 为什么 不能同时改变啊
|
| -- 作者：有点青 -- 发布时间：2016/11/20 10:04:00 -- 代码没问题，做例子上来。 |