- 帖子
- 2035
- 主題
- 24
- 精華
- 0
- 積分
- 2031
- 點名
- 0
- 作業系統
- Win7
- 軟體版本
- Office2010
- 閱讀權限
- 100
- 性別
- 男
- 註冊時間
- 2012-3-22
- 最後登錄
- 2024-2-1
|
12#
發表於 2013-10-22 06:02
| 只看該作者
本帖最後由 c_c_lai 於 2013-10-22 06:05 編輯
回復 11# 最高機密
看了以下分析便不會混亂了：- 假設 x，y 你的輸入值分別為 20040116，20040206
- x = "20040116" (輸入值)
- y = "20040206" (輸入值)
- [A2]
- Cells(a, 1) = 20040109
- StrComp(Cells(a, 1), x, 1) = -1 ' [A2] < x
- StrComp(y, Cells(a, 1), 1) = 1 ' y > [A2]
- [A3] (條件符合 - 成立)
- Cells(a, 1) = 20040116
- StrComp(Cells(a, 1), x, 1) = 0 ' [A3] = x
- StrComp(y, Cells(a, 1), 1) = 1 ' y > [A3]
- [A4] (條件符合 - 成立)
- Cells(a, 1) = 20040130
- StrComp(Cells(a, 1), x, 1) = 1 ' [A4] > x
- StrComp(y, Cells(a, 1), 1) = 1 ' y > [A4]
- [A5] (條件符合 - 成立)
- Cells(a, 1) = 20040206
- StrComp(Cells(a, 1), x, 1) = 1 ' [A5] > x
- StrComp(y, Cells(a, 1), 1) = 0 ' y = [A5]
- [A6]
- Cells(a, 1) = 20040213
- StrComp(Cells(a, 1), x, 1) = 1 ' [A6] > x
- StrComp(y, Cells(a, 1), 1) = -1 ' y < [A6]
- [A7]
- Cells(a, 1) = 20040220
- StrComp(Cells(a, 1), x, 1) = 1 ' [A7] > x
- StrComp(y, Cells(a, 1), 1) = -1 ' y < [A7]
|
|
