返回列表 上一主題 發帖

[發問] 想不明白為何程式會進入無線迴圈

jackyq

帖子
323 
主題
6 
精華
0 
積分
313 
點名
0  
作業系統
xp 
軟體版本
2k 
閱讀權限
20 
性別
男 
註冊時間
2015-6-24 
最後登錄
2026-1-5 
1# 跳轉到 »
發表於 2015-12-8 21:56 | 顯示全部帖子
考題來了 !!

正常下應該如(1) 一樣陷入無窮回圈
有沒有人知道為何 (2) 卻不會陷入無窮回圈

(1)
Private Sub Worksheet_Change(ByVal Target As Range)
  For w = 1 To 2
  [A1] = Val([A1]) + 1
  Next
End Sub

(2)
Private Sub Worksheet_Change(ByVal Target As Range)
  For w = 1 To 1
  [A1] = Val([A1]) + 1
  Next
End Sub

TOP

        靜思自在 : 人的心地是一畦田，土地沒有播下好種子，也長不出好的果實。 -
返回列表 上一主題