- 帖子
- 5923
- 主題
- 13
- 精華
- 1
- 積分
- 5986
- 點名
- 0
- 作業系統
- win10
- 軟體版本
- Office 2010
- 閱讀權限
- 150
- 性別
- 男
- 來自
- 台灣基隆
- 註冊時間
- 2010-5-1
- 最後登錄
- 2022-1-23
        
|
23#
發表於 2011-9-30 10:13
| 只看該作者
回復 22# herhsiu
UBound函數: 表示指定陣列某維最大可使用的陣列索引
Ar(UBound(Ar)) => "+00035-00006+00000+00700"
For i = 1 To Len(Ar(UBound(Ar))) Step 6 'Step 6 ->每隔6字元
A = A + Val(Mid(Ar(UBound(Ar)), i, 6))
'-> i=1-> +00035
'-> i=1+6 -00006
'-> i=7+6 +00000
'-> i=13 +00700
Next |
|
發表於 2011-9-29 18:28
| 
