以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]string的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=26299)

--  作者:chnfo
--  发布时间:2012/11/29 15:04:00
--  [求助]string的问题
举一例子,下面这段代码可以找到相应的订单ID
Dim ids As String
For Each
dr As DataRow In DataTables("订单").DataRows
ids = ids & "," & dr("订单ID")
Next
ids= ids.Trim(",")

但我对其中的部分订单已经做了审核,要形成未审核的订单的ids时,有几个方法
1.再遍历一次订单表,找出审核状态为否的订单ID,重新生成一个ids
2.我想在以前的那个ids中把已经审核的订单ID逐一去掉,该怎么做?
想过用replace,trim处理,但总有些小细节有点毛病。

--  作者:lin_hailun
--  发布时间:2012/11/29 15:20:00
--  
 代码这样写。

Dim data As String = "333,1,11,111,1111"
Dim t As String = "," & data & ","
t = t.Replace(",1,", ",")   \'去除1
t = t.Replace(",111,", ",")   \'去除111
msgbox(t.Trim(","))