Foxtable(狐表)用户栏目专家坐堂 → [求助]如何提取姓名中的首字母?


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

主题:[求助]如何提取姓名中的首字母?

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


加好友 发短信
等级:五尾狐 帖子:1142 积分:8900 威望:0 精华:0 注册:2012/7/10 9:09:00
[求助]如何提取姓名中的首字母?  发帖心情 Post By:2021/5/28 9:49:00 [只看该作者]

代码:Dim xm As String = PY.GetNamePY(e.DataRow("姓名"),False ,3)
If e.DataRow("姓名") = Nothing Then
e.DataRow("首字母") = Nothing
Else
e.DataRow("首字母") = xm.SubString(0,1)
End If

但显示说:py未声明名称,怎么改代码,谢谢。

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


加好友 发短信
等级:超级版主 帖子:110337 积分:561533 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/28 9:53:00 [只看该作者]

您foxtable应该是很老的版本了吧,更新foxtable到新版才有这py的用法

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


加好友 发短信
等级:五尾狐 帖子:1142 积分:8900 威望:0 精华:0 注册:2012/7/10 9:09:00
  发帖心情 Post By:2021/5/28 9:56:00 [只看该作者]

老的版本怎么写代码,谢谢

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


加好友 发短信
等级:超级版主 帖子:110337 积分:561533 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/28 10:05:00 [只看该作者]

参考:http://www.foxtable.com/webhelp/topics/3240.htm
或者打开Foxtable,按F1打开离线帮助,搜索“拼音

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


加好友 发短信
等级:五尾狐 帖子:1142 积分:8900 威望:0 精华:0 注册:2012/7/10 9:09:00
  发帖心情 Post By:2021/5/28 10:12:00 [只看该作者]

已解决。代码如下:Select Case e.DataCol.Name
    Case "姓名"
Dim xm As String
        If e.NewValue <> "" Then
            xm = GetPy(e.NewValue, True)
e.DataRow("首字母") =  xm.SubString(0,1)
        End If
End Select
谢谢

 回到顶部