- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- “圆钢”的数值变化，却是会反应到第一行去了 ，怎样才能让其同步变化在同一行的相应列上？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=132891)
-- 发布时间：2019/4/1 16:48:00
-- “圆钢”的数值变化，却是会反应到第一行去了 ，怎样才能让其同步变化在同一行的相应列上？
当点击“入库明细表”中的“入库筐架”列的下拉窗口（不是第一行）输入数据后，
后面的列，如：“圆钢”的数值变化，却是会反应到第一行去了 ，怎样才能让其同步变化在同一行的相应列上？
[此贴子已经被作者于2019/4/30 10:01:32编辑过]
-- 发布时间：2019/4/1 16:54:00
--
Dim ss As String = "圆钢|不锈钢|袋子|铁箱|塑箱|冰盘|铁托|木托|铁架|大网笼|小网笼|圆桶|大网筐|小网筐|方桶"
Dim str As String = ""
Dim r As Row = Tables(e.Form.DropTable.Name).Current
For i As Integer = 0 To ss.Split("|").Length - 1
If Val(e.Form.controls("textbox" & i+1).text) > 0 Then
str &= e.Form.controls("textbox" & i+1).text & ss.Split("|")(i)
r(ss.Split("|")(i)) = e.Form.controls("textbox" & i+1).text
Else
r(ss.Split("|")(i)) = Nothing
End If
Next
e.Form.DropDownBox.value = str.trim("")
-- 发布时间：2019/4/1 17:14:00
--
.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2018.10.9.1
错误所在事件：SystemIdle
详细错误信息：
索引超出范围。必须为非负值并小于集合大小。
参数名: index
[此贴子已经被作者于2019/4/30 10:01:42编辑过]
-- 发布时间：2019/4/1 17:48:00
-- 回复：（有点蓝）Dim ss As String = "圆钢|不锈钢|袋...
此主题相关图片如下：)_25hozk0bkk4d1z%%6d2b.png
-- 发布时间：2019/4/1 18:17:00
--
点击窗口中的新增一行按钮，会出现错误
-- 发布时间：2019/4/1 18:26:00
--
窗口currentChanged事件加入红色代码
If e.Table.current Is Nothing Then Return
Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("入库订单表").FindRow(dr)
msgbox(wz)
If wz >=0 Then
Tables("入库订单表").Position = wz
End If
-- 发布时间：2019/4/1 20:09:00
-- 回复：（有点甜）窗口currentChanged事件加入红色代码...
窗口代码改了，还是不行，点击窗口中的“入库订单表”，点击新增一行，直接坏掉？
.NET Framework 版本：2.0.50727.8800
Foxtable 版本：2018.10.9.1
错误所在事件：SystemIdle
详细错误信息：
索引超出范围。必须为非负值并小于集合大小。
参数名: index
[此贴子已经被作者于2019/4/30 10:01:56编辑过]
-- 发布时间：2019/4/1 20:34:00
--
我测试没有问题。把项目里的额bin目录删除掉，重启项目测试
-- 发布时间：2019/4/1 21:18:00
-- 回复：（有点蓝）我测试没有问题。把项目里的额bin目录...
确定测试了无数次，bin也删了，刚发到论坛的压缩包，我自己也另外解压了，也错误，就连数据源地址也调整过，不行啊！
要不，老师，您再下载，测试看看：
[此贴子已经被作者于2019/4/30 10:02:20编辑过]
-- 发布时间：2019/4/1 21:23:00
--
点击那里，做什么操作有问题？
不然你就把菜单事件里的SystemIdle事件代码清除掉