VB.NET - 字串相關運用

在vb.net裡用vb的函式

'Microsoft.VisualBasic.函式

'例如：



Microsoft.VisualBasic.Right(s,2)

Microsoft.VisualBasic.Left(s,2)

Mid()
從字串中截取一段字串

s="123456"

s=Mid(s,2,4)　　'從s第2個字元起，連續取4個字元成為新字串

結果：s等於"2345"

VB.NET

Trim()
截掉字串的頭尾字元，如果未給值則是去掉頭尾的空白，如果有給值，則去掉頭尾所有符合給定值的字元！

Dim S1 as string

S1 ="aab123456789bcaa"

S1=S1.Trim("a", "b")

結果：S1等於"123456789bc"

Compare()

'語法：n=string.Compare(str1,str2)

'功能：str1字串與str2字串作比較，若

'           str1 > str2 傳回 1

'           str1 = str2 傳回 0

'           str1 < str2 傳回 -1

ToUpper / ToLower

'語法：str1.ToUpper / str1.ToLower

'功能：將str1字串中所有字母轉成大寫 / 小寫

CompareTo

'語法：n=str1.CompareTo(str2)

'功能：str1字串與str2字串作比較，若

'           str1 > str2 傳回 1

'           str1 = str2 傳回 0

'           str1 < str2 傳回 -1

Copy

'語法：str1=string.copy(str2)

'功能：將str2字串複製給str1字串

'ex ： str1="aaa"

'      str2="bbb"

'      str1=string.Copy(str2)   -> str1="bbb"

CopyTo

'語法：str1.CopyTo(n1,arrayA,,n2,n3)

'功能：將str1字串的第n1個位置開始複製n3個字元放到arrayA字元陣列，由第n2個位置開始放起

'範例：Dim arrayA(8) as char

'　　　　str1="aabbccddeeff"

'　　　　str1.CopyTo(4,arrayA,2,4)

'　　　　arrayA(0)=""

'　　　　arrayA(1)=""

'　　　　arrayA(2)="c"

'　　　　arrayA(3)="c"

'　　　　arrayA(4)="d"

'　　　　arrayA(5)="d"

'　　　　arrayA(6)=""

'　　　　arrayA(7)=""

'　　　　arrayA(8)=""

SubString

'語法：str1.SubString(n1,n2)

'功能：將str1字串第n1個字元開始取n2個字元

Equals

'語法：str1.Equals(str2)

'功能：檢查str1字串是否和str2字串相等

PadLeft / PadRight

'語法：str1.Padright(n,"*")

'功能：以指定的字元補足在字串 左/右方,使其長度為n

'範例：str1="abc"

'　　　str2=str1.Padright(6,"*")  -> str2 = "abc***"

Insert

'語法：str1.Insert(n,str2)

'功能：將str2字串插在str1字串的第n個

Split

'語法：arrayA=str1.Split(分隔字元或符號)

'功能：將字串按照指定的字元作分隔符號,將字串隔開分存置字串陣列中

Join

'語法：str1.Join(分隔字元或符號,陣列)

'功能：將string型別的各陣列字串,透過指定的分隔字元,組合成一個字串

'範例：myArray(0)="aa"

'　　　myArray(1)="bb"

'　　　myArray(2)="cc"

'　　　str1.join("*",myArray)  -> str1="aa*bb*cc"

Replace

'語法：str1.Replace(str2,str3)

'功能：將str1字串中的str2字串以str3取代

IndexOf / LastIndexOf

'語法：n=str1.indexOf(str2)

'功能：由str1字串內找出str2第一次出現的位置(由0開始算起),若找不到傳回-1

字元字串的特殊用法

vbNewLine

'新增一行

vbTab

'填入一個間隔字元(tab字元)