海量資料去除非數字字元（四種方法）

如果在一列中存入不規則的海量資料，數字和字串混合，現在需要提取數字，總共總結出下面四中方法，依據執行速度快慢依次排列，推薦使用前三種方法：

第一種：陣列方法，速度最快

1

suby3231057_1()2t 
=timer
3dim
arr, i
&, j%, k
&, s$, ss$, 
str$
4dim
arr1() 
assingle
5arr 
=range(
"a1:a"&
[a65536].end(xlup).row)6k 
=ubound
(arr)
7redim
arr1(1to
k, 1to1
)8fori =1
tok9s 
=arr(i, 1)
10forj =
1tolen(s)
11ss 
=mid
(s, j, 1)
12if
ss like 
"[0-9.]
"then
13str
=str&ss
14nextj15
arr1(i, 1) 
=str
16str=""
17nexti18
[b1].resize(k, 1) 
=arr1
19[d65536].end(xlup).offset(1, 
0) =timer -t
20end sub

第二種：正規表示式的方法，速度較陣列方法稍慢

1

suby3231057_2()2t 
=timer
3dim
arr, i&4
dimarr1() 
assingle
5arr 
=range(
"a1:a"&
[a65536].end(xlup).row)6k 
=ubound
(arr)
7redim
arr1(1to
k, 1to1
)8with
createobject("
vbscript.regexp")
9fori =
1tok10
.pattern ="
你|是|限制|大小|自動|應用|以下"11
.global 
=true
12arr1(i, 1) 
=.replace(arr(i, 
1), "")
13nexti14
endwith
15[b1].resize(k, 1) 
=arr1
16[f65536].end(xlup).offset(1, 
0) =timer -t
17end sub

第三種：遍歷需轉換字元，依據需轉換字元批量轉換方法，速度叫正規表示式方法稍慢

1

suby3231057_3()2t 
=timer
3dim
arr4
dimk 
asinteger
5dim
rng 
asrange6=
false
7arr 
=array("你
", "是
", "限制
", "大小
", "自動
", "應用
", "以下
")8set
rng 
=range(
"c1:c"&
sheet1.[c65536].end(xlup).row)
9fork =
0toubound
(arr)
10rng.replace what:
=arr(k), replacement:=""
11next
12set
rng 
=nothing13=
true
14[g65536].end(xlup).offset(1, 
0) =timer -t
15end sub

第四種：依據單元格迴圈，乙個乙個轉換方法，速度很慢，約為上面幾種方法用時的幾百倍

1

suby3231057_4()2t 
=timer
3dim
arr4
dimi 
aslong
5dim
k as
integer
6arr 
=array("你
", "是
", "限制
", "大小
", "自動
", "應用
", "以下
")7fori =
1to[a65536].end(xlup).row
8fork =
0toubound
(arr)
9cells(i, "c
").replace arr(k), 
""10
next
11next
12[e65536].end(xlup).offset(1, 
0) =timer -t
13end sub

JS四種方法去除字串最後的逗號

var obj 定義乙個object物件 4var str 定義乙個空字元用來接收物件裡的key或者value 5for var item in obj 9 第一種方法 將字串中最後乙個元素 逗號去掉，10 str str.substring 0,str.lastindexof 1112 第二種方法...

四種方法解析JSON資料

1 使用touchjson解析方法 需匯入包 import touchjson json cjsondeserializer.h 1 使用touchjson來解析北京的天氣 2 ibaction btnpresstouchjson id sender 2 使用sbjson解析方法 需匯入包 impo...

通過四種方法查詢字元A

system.string類中定義的主要方法及其功能 string的常用方法 屬性 說明clone 物件的複製 compare 字串比較 concat 字串連線 copy 把字串物件複製到另乙個物件上 startwith 測試開始字串 endswith 測試結尾字串 equals 比較字串是否相等 ...