以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于自定义函数中的行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=195665)

--  作者:pyh6918
--  发布时间:2025/2/26 18:45:00
--  关于自定义函数中的行
dim zzy as row = Tables("专业").Current
Dim zzh As Row = Tables("报告").AddNew
Functions.Execute("顺序","zzy","zzh")

顺序函数如下:
If  args(0)("批次") = "本科" Then
    args(1)("批次顺序")=200
ElseIf args(0)("批次") = "专科" Then
    args(1)("批次顺序")=400
Else
    args(1)("批次顺序")=1000
End If

错误所在事件:自定义函数顺序
详细错误信息:
调用的目标发生了异常。
从字符串“批次”到类型“Integer”的转换无效。
输入字符串的格式不正确。

请问怎么修改自定义函数?谢谢!!