Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于自定义函数中的行


  共有155人关注过本帖树形打印复制链接

主题：关于自定义函数中的行
帅哥哟，离线，有人找我吗？
pyh6918
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1152 积分：11224 威望：0 精华：2 注册：2008/9/1 10:45:00 		关于自定义函数中的行  发帖心情 Post By：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”的转换无效。
输入字符串的格式不正确。

请问怎么修改自定义函数？谢谢！！
 回到顶部
帅哥哟，离线，有人找我吗？
y2287958
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：4853 积分：35183 威望：0 精华：0 注册：2008/8/31 22:44:00 		  发帖心情 Post By：2025/2/27 8:05:00 [只看该作者]

从字符串“批次”到类型“Integer”的转换无效

赋值与列类型不相符
 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1152 积分：11224 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2025/2/27 8:39:00 [只看该作者]

怎么改才能相符？

 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112503 积分：572807 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2025/2/27 8:49:00 [只看该作者]

批次列是什么列类型？

试试
dim zzy as row = Tables("专业").Current
if zzy isnot nothing
Dim zzh As Row = Tables("报告").AddNew
Functions.Execute("顺序","zzy","zzh")
endif
函数
dim zzy as row = args(0)
Dim zzh As Row = args(1)
If  zzy("批次") = "本科" Then
    zzh("批次顺序")=200
ElseIf zzy("批次") = "专科" Then
    zzh("批次顺序")=400
Else
    zzh("批次顺序")=1000
End If
 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1152 积分：11224 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2025/2/27 8:59:00 [只看该作者]

批次列是字符型，批次顺序是整数型
按您的方法改后出现下面的错误提示：
无法将类型为“System.String”的对象强制转换为类型“Foxtable.Row”。

 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112503 积分：572807 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2025/2/27 9:07:00 [只看该作者]

Functions.Execute("顺序",zzy,zzh)

 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1152 积分：11224 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2025/2/27 9:20:00 [只看该作者]

多谢蓝版！可以了，原来是不用加引号图片点击可在新窗口打开查看

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06250 秒, 4 次数据查询