Foxtable(狐表)用户栏目专家坐堂 → [求助]如何去掉指定的字符呢。


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

主题:[求助]如何去掉指定的字符呢。

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


加好友 发短信
等级:六尾狐 帖子:1287 积分:10362 威望:0 精华:1 注册:2018/1/20 12:40:00
[求助]如何去掉指定的字符呢。  发帖心情 Post By:2019/4/9 17:15:00 [只看该作者]

0.5|1|0.5    类似这样的一组,如何去掉最后一个 | 和他后面的数据呢。 让他变成0.5|1

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


加好友 发短信
等级:狐神 帖子:6831 积分:43213 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2019/4/9 17:26:00 [只看该作者]

Dim str As String="1|2"
MessageBox.Show(str.replace("|" & str.split("|")(str.split("|").length-1),""))
[此贴子已经被作者于2019/4/9 18:14:11编辑过]

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


加好友 发短信
等级:六尾狐 帖子:1287 积分:10362 威望:0 精华:1 注册:2018/1/20 12:40:00
  发帖心情 Post By:2019/4/9 18:45:00 [只看该作者]

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim s As String = y & "-" & s
Dim cr As DataRow = CurrentTable.Current.DataRow
'Dim Values() As String = cr("抵扣月份").split("|")
Dim Result As DialogResult
Result = MessageBox.Show("修改当前行的请假扣款记录,是否继续 ?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    If CurrentTable.Current("抵扣月份").Contains(s) Then
      Cr("抵扣月份")=Cr("抵扣月份").repalce(Cr("抵扣月份").split("|")(Cr("抵扣月份").split("|").lenth-1,""))
    End If
End If

麻烦看看问题在哪里呀。
是因为这个是备注列吗?
.NET Framework 版本:2.0.50727.8937
Foxtable 版本:2018.10.9.1
错误所在事件:窗口,综合奖惩记录表,Button6,Click
详细错误信息:
未找到类型“String()”的公共成员“lenth”。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/4/9 19:19:00 [只看该作者]

Cr("抵扣月份")=Cr("抵扣月份").repalce(Cr("抵扣月份").split("|")(Cr("抵扣月份").split("|").length-1,""))

 回到顶部