以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]合成字符串  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106757)

--  作者:blsu33
--  发布时间:2017/9/15 10:03:00
--  [求助]合成字符串
 图片点击可在新窗口打开查看
--  作者:blsu33
--  发布时间:2017/9/15 10:04:00
--  
 老师,
   TrimEnd 也不成功,劳烦您给看下?
Dim GZ As String="422222"
Dim str As String="JD0101"
Dim cnt,cnt2 As Integer
Dim ftr As String
For i As Integer=0 To GZ.length-1
cnt=cnt+Val(GZ.SubString(i,1))
    If cnt<=str.length Then
                ftr &= " ym_gzid=\'" & str.SubString(0,cnt) &"\'"  &  "Or"
        i=i+1
    Else
        Exit For
    End If
Next
MessageBox.Show(ftr.TrimEnd("Or"))
[此贴子已经被作者于2017/9/15 10:20:04编辑过]

--  作者:blsu33
--  发布时间:2017/9/15 10:23:00
--  
 什么鬼?
MessageBox.Show(ftr.Trimend("o","r")) 成功图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/9/15 10:26:00
--  

Trim只能去除单个字符,不能去掉字符串。

 

你直接用substring也行;或者是,在后面加条件 1=2 也行。