彻底缴械，搞不定了。整个程序都端上来，请大红袍老师搭救
此主题相关图片如下：qq截图20150812175748.png
第一个问题：如何根据“代码2”列值，生成“表述2”列。如：
代码2= [任务信息.类型的3-8位]:应到[任务信息.应到]人，实到[任务信息.实到]人，到会率[任务信息.应到/任务信息.实到]%，得[得piao]piao，排名第[排名]。
表述2= 谈话推荐：应到5人，实到4人，到会率80%，飞人得4piao，排名第1.
代码在这里：推荐得piao》DataColChanged
'自动生成表述2 代码有误所以屏蔽了
If e.DataCol.name ="得piao" Then
Dim s As String = e.DataRow("代码2")
Dim mc = System.Text.RegularExpressions.Regex.Matches(s, "\[.*?\]")
For i As Integer = 0 To mc.count - 1
Dim ary As String() = mc(i).value.split(".")
If ary.length = 1
s = s.Replace(mc(i).Value, e.DataRow(mc(i).Value.Substring(1,mc(i).Value.length-2)))
Else
Dim pdr As DataRow = e.DataRow.GetParentRow(ary(0).substring(1))
s = s.Replace(mc(i).Value, pdr(ary(1).Substring(0,ary(1).length-1)))
End If
Next
e.DataRow("表述2") = s
End If
第二个问题：新增行怎么自动继承代码1和代码2字段？今天用了帮助里面的自动复制行功能，很容易被崩溃；如果用列默认值方式，实测也不行
第三个问题：今天下午好像没有修改什么代码，但突然很容易程序崩溃，有什么办法可以快速找到崩溃点？当然，我也要回想一下到底改动了那里的代码先。。。
涉及信息，不能下载啦！
[此贴子已经被作者于2015/8/12 19:16:48编辑过]
加好友 
发短信
Post By：2015/8/2 12:34:00 [只看该作者]
点击浏览该文件