Foxtable(狐表)用户栏目专家坐堂 → [求助]自动编号出错,哪儿有问题啊?


  共有2108人关注过本帖平板打印复制链接

主题:[求助]自动编号出错,哪儿有问题啊?

帅哥哟,离线,有人找我吗?
cd_tdh
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3106 积分:20733 威望:0 精华:0 注册:2016/3/28 16:57:00
[求助]自动编号出错,哪儿有问题啊?  发帖心情 Post By:2016/6/7 15:23:00 [只看该作者]

If e.DataCol.Name = "登记时间" Then If e.DataRow.IsNull("登记时间") Then e.DataRow("序号") = Nothing Else Dim bh As String = Format(e.DataRow("登记时间"),"yyyyMMdd") '取得序号的8位前缀 If e.DataRow("序号").StartsWith(bh) = False '如果序号的前8位不符 Dim max As String Dim idx As Integer max = e.DataTable.Compute("Max(序号)","登记时间 = #" & e.DataRow("登记时间") & "# And [_Identify] <> " & e.DataRow("_Identify")) '取得该天的最大序号 If max > "" Then '如果存在最大序号 idx = CInt(max.Substring(9,3)) + 1 '获得最大序号的后三位顺序号,并加1 Else idx = 1 '否则顺序号等于1 End If e.DataRow("序号") = bh & "-" & Format(idx,"000") End If End If End If 错误提示: .NET Framework 版本:2.0.50727.5485 Foxtable 版本:2015.12.22.1 错误所在事件:表,保证金管理,DataColChanged 详细错误信息: 调用的目标发生了异常。 未找到类型“Integer”的公共成员“StartsWith”。

 回到顶部