以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码问题.  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=44581)

--  作者:blackzhu
--  发布时间:2014/1/4 10:51:00
--  代码问题.
Dim Arys As List(Of String())
Dim str,str1 As String
Arys = Tables("主表.主表明细").DataTable.GetValues("封号|箱号","工作单号=\'JPCD1312250019\'")

For Each Ary As String() In Arys
    str = str & "," & vbcrlf & Ary(1)
    str1 = str1 & "," & vbcrlf & Ary(0)
    str= str.TrimStart(",")

    
    \' str1= str1.TrimStart(",")
    \' str= str.Replace("""",str)
    Output.Show(str)
    \' Output.Show(str1)
Next

  这个代码因为str= str.TrimStart(",")后第一个会有一个空格,怎去除这个空格?

--  作者:Bin
--  发布时间:2014/1/4 10:53:00
--  
str.TrimStart(",").trim()
--  作者:blackzhu
--  发布时间:2014/1/4 10:54:00
--  
BIn的好用
[此贴子已经被作者于2014-1-4 10:54:59编辑过]