字符串根据多个字符进行分割的一种方法

2016-01-29 13:35 11 1 收藏

字符串根据多个字符进行分割的一种方法,字符串根据多个字符进行分割的一种方法

【 tulaoshi.com - ASP.NET 】

 

Dim s As String = "gtdfg123fdgdfs123dd123"

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

        Dim c() As Char = {"1", "2", "3"}

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

        Dim a() As String = s.Split(c)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

        Dim p As String

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

        For Each p In a

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

            If p < "" Then

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

                MessageBox.Show(p)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

            End If

来源:http://www.tulaoshi.com/n/20160129/1490737.html

延伸阅读
标签: Delphi
  该示例演示了一个字符串扩展splitex例子,文章内含源代码。 function SplitEx(const Str {需要拆分的文章}, Delimiters {拆分关键字,回车.?!等}: string): TStringList; var ss: WideString; i, St: integer; function IsDelimiter(const Delimiters, c: string): Boolean; begin //判断是否为拆分关键...
void Split(CString content, CString pattern, CAtlArrayCString& strlist) {     int iPos = content.Find(pattern), iStart = 0;     while (iPos != -1)     {         strlist.Add(content.Mid(iStart, iPos - iStart));     &...
方法1:采用String的split,验证代码如下: import java.util.Arrays; public class TestSplit {  public static void main(String[] args) {   String orignString = new String("5,8,7,4,3,9,1");   String[] testString = orignString.split(",");   int[] test = { 0, 0, 0, 0, 0, 0, ...
标签: Web开发
Function strnum(patrn, strng)   Dim regEx, Match, Matches,xx     xx=0   Set regEx = New RegExp   regEx.Pattern = patrn   regEx.IgnoreCase = True       &nbs...
use tempdb go --测试数据 declare @s varchar(1000) set @s='ak47,mp5,1,23' /*要求输出结果 S ---- ak47 mp5 1 23 */ --3种方法对比: --1.[朴实]动态Exec方法: declare @s1 varchar(1000) set @s1=right(replace(','+@s,',',''' as S union select '''),le...