请帮助解决：在第5行“机号”列输入3后，上面的未输入行都自动输入3。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请帮助解决：在第5行“机号”列输入3后，上面的未输入行都自动输入3。

共有9895人关注过本帖树形打印复制链接主题：请帮助解决：在第5行“机号”列输入3后，上面的未输入行都自动输入3。

lyfxybc

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1294 积分：9852 威望：0 精华：0 注册：2012/9/19 21:13:00

请帮助解决：在第5行“机号”列输入3后，上面的未输入行都自动输入3。 发帖心情

Post By：2012/10/11 17:59:00 [只看该作者]

请帮助解决：

（1）在第5行“机号”列输入3后，上面的“机号”列未输入行都自动输入3。

[此贴子已经被作者于2020/3/19 19:53:52编辑过]

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47497 积分：251397 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/10/11 18:48:00 [只看该作者]

不要说易表，直接说你要干什么就行。

czy

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：6318 积分：33957 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2012/10/11 20:49:00 [只看该作者]

我来翻译一下

1、

DataColChanged事件代码

If e.DataCol.Name = "机号"
    If e.DataRow.IsNull("机号") = False
        For Each dr As DataRow In e.DataTable.Select("[机号] Is null And [_Identify] < " & e.DataRow("_Identify"))
            dr("机号") = e.NewValue
        Next
    End If
End If

2、怎么个累计法？易表中变量中的公式是什么？

3、

If MessageBox.Show("警告:本操作仅限于数值累计,执行后将累计数值!" & vbcrlf & "单击'是'累计,单击'否'退出","提示",MessageBoxButtons.YesNo) = DialogResult.Yes Then
    Dim r As Row = Tables("坯布输入").Current
    r("疵点_缺经") = r("疵点_缺经") + r("疵点_缺经1")
Else
    Forms("要打开的指定窗口名称").Open
End If