ASP中一個字符串處理類
2024-05-04 11:02:55
供稿:網友
復制代碼 代碼如下:
<%
class StringOperations
''****************************************************************************
'''' @功能說明: 把字符串換為char型數組
'''' @參數說明: - str [string]: 需要轉換的字符串
'''' @返回值: - [Array] Char型數組
''****************************************************************************
public function toCharArray(byVal str)
redim charArray(len(str))
for i = 1 to len(str)
charArray(i-1) = Mid(str,i,1)
next
toCharArray = charArray
end function
''****************************************************************************
'''' @功能說明: 把一個數組轉換成一個字符串
'''' @參數說明: - arr [Array]: 需要轉換的數據
'''' @返回值: - [string] 字符串
''****************************************************************************
public function arrayToString(byVal arr)
for i = 0 to UBound(arr)
strObj = strObj & arr(i)
next
arrayToString = strObj
end function
''****************************************************************************
'''' @功能說明: 檢查源字符串str是否以chars開頭
'''' @參數說明: - str [string]: 源字符串
'''' @參數說明: - chars [string]: 比較的字符/字符串
'''' @返回值: - [bool]
''****************************************************************************
public function startsWith(byVal str, chars)
if Left(str,len(chars)) = chars then
startsWith = true
else
startsWith = false
end if
end function
''****************************************************************************
'''' @功能說明: 檢查源字符串str是否以chars結尾
'''' @參數說明: - str [string]: 源字符串
'''' @參數說明: - chars [string]: 比較的字符/字符串
'''' @返回值: - [bool]
''****************************************************************************
public function endsWith(byVal str, chars)
if Right(str,len(chars)) = chars then
endsWith = true
else
endsWith = false
end if
end function
''****************************************************************************
'''' @功能說明: 復制N個字符串str