Foxtable(狐表)用户栏目专家坐堂 → [求助]自动生成代码缩写


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

主题:[求助]自动生成代码缩写

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


加好友 发短信
等级:幼狐 帖子:156 积分:1328 威望:0 精华:0 注册:2016/6/21 12:27:00
[求助]自动生成代码缩写  发帖心情 Post By:2020/2/14 11:53:00 [显示全部帖子]

 求大师指点:

Select Case e.DataCol.name
    Case "动作名称"
        If e.NewValue Is Nothing Then
            e.DataRow("动作代码") = Nothing
        Else
            e.DataRow("动作代码") = GetPy(e.NewValue,True)
        End If
End Select

这段代码生成 后会将:”蒙压“生成 为“LY”,应该生成为:“MY"。

求解决方法


 回到顶部
帅哥哟,离线,有人找我吗?
Cloud
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:156 积分:1328 威望:0 精华:0 注册:2016/6/21 12:27:00
回复:(有点蓝)使用这个:http://www.foxtable.com/...  发帖心情 Post By:2020/2/14 12:20:00 [显示全部帖子]

显示未声明"PY"


 回到顶部
帅哥哟,离线,有人找我吗?
Cloud
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:156 积分:1328 威望:0 精华:0 注册:2016/6/21 12:27:00
回复:(有点蓝)需要更新foxtable到新版本。  发帖心情 Post By:2020/2/14 14:38:00 [显示全部帖子]

我的版本是2019.7.9,现在用不了这个代码?


 回到顶部
帅哥哟,离线,有人找我吗?
Cloud
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:156 积分:1328 威望:0 精华:0 注册:2016/6/21 12:27:00
回复:(Cloud)回复:(有点蓝)需要更新foxtable到新...  发帖心情 Post By:2020/3/2 18:38:00 [显示全部帖子]

我以前编写的系统发布出去的没问题,重新打开后都不能用了
图片点击可在新窗口打开查看此主题相关图片如下:jietu.jpg
图片点击可在新窗口打开查看
后面类似的代码也写不了,没办法再编辑系统了
[此贴子已经被作者于2020/3/2 18:40:15编辑过]

 回到顶部