- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]自动输入解决方案—BUG管理系统 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=70305)
-- 发布时间：2015/6/18 16:45:00
-- [求助]自动输入解决方案—BUG管理系统
HI：
此主题相关图片如下：2015-06-18_163951.png
这个一个缺陷登记系统，我想让梯号这个栏输入一组数值后能保持不变（除非人工修改），我在输入下一行时自动输入不用在额外写一遍了。
此主题相关图片如下：2015-06-18_163951.png
着就是我要输入的结果。谁有办法让他很省力。。。。新手求教。
-- 发布时间：2015/6/18 16:49:00
--
DataColChanged 事件
Static tihao As String = ""
If e.DataCol.Name = "梯号" Then
tihao = e.NewValue
End If
If e.DataCol.Name = "检测日期" Then
e.DataRow("梯号") = tihao
End If
-- 发布时间：2015/6/18 16:50:00
--
新增行按钮
dim r as row = tables("X").current
dim dr as datarow = datatables("X").addnew
dr("梯号")=r("梯号")