.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2016.7.29.1
错误所在事件:窗口,人员新增,新增,Click
详细错误信息:
startIndex 不能大于字符串长度。
参数名: startIndex
Tables("退休信息").AddNew
'-----------------以下是自动取工号----------------------------
Dim i As String = DataTables("退休信息").Compute("max(序号)", "是否死亡 = false")
Dim idx As Integer
If i > "" Then '若有最大值,即表数据不为空
idx = CInt(i.Substring(2,3)) + 1 '提取字符串i里的数字,并加1
Else
idx = 1 '若表数据为空 就=1
End If
Tables("退休信息").Current("序号") = "TX" & Format(idx,"000")
'-----------------以上是自动取工号----------------------------