取得姓名最后一个字符 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 取得姓名最后一个字符

共有7876人关注过本帖树形打印复制链接主题：取得姓名最后一个字符

edisontsui

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1591 积分：10342 威望：0 精华：0 注册：2014/12/18 16:12:00

取得姓名最后一个字符 发帖心情

Post By：2022/9/26 11:19:00 [只看该作者]

If e.DataCol.Name = "完成人" Then

Dim cnts As Integer = e.DataRow("完成人").length

Dim st As String

For cnt As Integer = 0 To cnts - 1

If e.DataRow("完成人").substring(cnt) = "," Then

st = st & e.DataRow("完成人").substring(cnt - 1) & ","

MsgBox(st)

End If

e.DataRow("操作员") = st & e.DataRow("完成人").substring(cnts - 1)

End If

“完成人”的内容：安大芬,曾桂花,寸待熬。面代码我希望取得“完成人”的姓名字符串最后一个字符，在e.DataRow("操作员")得出：芬,花,熬。但是实际运行结果只得出了“熬”字。MsgBox(st) 没有显示任何信息。请问是问什么呢？谢谢。

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：113660 积分：578843 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2022/9/26 11:25:00 [只看该作者]

使用split根据逗号拆分姓名为数组：http://www.foxtable.com/webhelp/topics/0245.htm

然后遍历数组取每个姓名的右边一个字：http://www.foxtable.com/webhelp/topics/3264.htm，再重新合并为一个字符串

主题：取得姓名最后一个字符