中文字幕免费精品_亚洲视频自拍_亚洲综合国产激情另类一区_色综合咪咪久久

在《VBS For Next循環的一些細節》中說到了 For Next 循環的控制變量僅僅在循環開始前求值一次，但是其中存在一處陷阱

昨天寫《QWERTY密碼：加密與解密》的時候，為了得到26個字母的字符串，寫了這樣一個 For Next 循環：

代碼如下:

'Author: Demon

'Website: http://demon.tw

'Date: 2012/2/10

For i = 65 To (i + 25)

s = s & Chr(i)

Next

WScript.Echo s

運行后卻發現沒有字符串輸出，覺得很奇怪，于是簡單修改了一下：

代碼如下:

'Author: Demon

'Website: http://demon.tw

'Date: 2012/2/10

For i = 65 To (i + 25)

WScript.Echo Chr(i)

s = s & Chr(i)

Next

WScript.Echo s

仍然沒有任何輸出，說明 For Next 循環中的語句根本就沒有執行，百思不得其解，于是請教了一下預言家晚報，他很快就發現了陷阱所在：

代碼如下:

'Author: Demon

'Website: http://demon.tw

'Date: 2012/2/10

For i = 65 To (i + 25) Step -1

WScript.Echo Chr(i)

s = s & Chr(i)

Next

WScript.Echo s

這次種終于有輸出了，相信聰明的你也一定發現了陷阱在哪里。For Next 循環的求值順序并不是按照從左到右的，表達式 (i + 25) 在 i = 65 之前就已經求值了，而此時 i 的值是默認的0，所以原循環相當于：

代碼如下:

'Author: Demon

'Website: http://demon.tw

'Date: 2012/2/10

For i = 65 To 25

s = s & Chr(i)

Next

WScript.Echo s

當然不會有輸出，最后我把程序改成了這樣：

代碼如下:

'Author: Demon

'Website: http://demon.tw

'Date: 2012/2/10

For i = Asc("A") To Asc("Z")

s = s & Chr(i)

Next

WScript.Echo s

既直截了當，又不會碰到 For Next 陷阱。