- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 运行过程中出现如下问题。。。 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=48573)
-- 发布时间：2014/4/1 9:24:00
-- 运行过程中出现如下问题。。。
在试用版上能运行的代码，在开发版上运行时出现如下问题，是怎么回事？
此主题相关图片如下：qq图片20140401092159.jpg
-- 发布时间：2014/4/1 9:26:00
--
写的代码如下所示：Tables("gdzc").AddNew()
Select e.DataCol.Name
Case "类型"
If e.DataRow.IsNull("类型") Then
e.DataRow("资产编号") = Nothing
Else
Dim lb As String = e.DataRow("类型")
If e.DataRow("资产编号").StartsWith(lb) = False \'如果单据编号前缀不符
Dim max As String
Dim idx As Integer
max = e.DataTable.Compute("Max(资产编号)","类型 = \'" & lb & "\' And [_Identify] <> " & e.DataRow("_Identify")) \'取得该类别的最大编号
If max > "" Then \'如果存在最大编号
idx = CInt(max.Substring(2,3)) + 1 \'获得最大编号的后三位顺序号,并加1
Else
idx = 1 \'否则顺序号等于1
End If
e.DataRow("资产编号") = lb & Format(idx,"000")
End If
End If
End Select
-- 发布时间：2014/4/1 9:30:00
--
你资产编号 列是数值列,改为字符串列.
或者改代码
If e.DataRow("资产编号").toString().StartsWith(lb) = False then
-- 发布时间：2014/4/1 9:36:00
--
谢谢bin老师，我写了一个查询窗口，在试用版可以运行，可一到了开发版又出现了问题，运行后出现如下问题，未找到类型“TreeView”的公共成员“Text”。
-- 发布时间：2014/4/1 9:39:00
--
呵呵,不可能在试用版可以运行.你搞错了.
因为TreeVIEW 是没有TExt 属性的哦.