以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于自定义函数中的行  (http://foxtable.net/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”的转换无效。
输入字符串的格式不正确。

请问怎么修改自定义函数？谢谢！！