讓你的代碼速度更快一些

1、If then 語句比 iif 函數　快　６倍　左右

２、Left$(string, 1)比Mid$(string, 1, 1)　快　４０％左右（Right$也一樣）

３、判斷空字符串 Len("") = 0比"" = ""　快 2.6倍左右

４、id = 9 \ 4 比id = Int(9 / 4) 快　４.5倍，注意 \ 是整除

５、Do Until rs.EOF

k = k + 1

rs.MoveNext

Loop

kk = rs.RecordCount

For i = 1 To kk

k = k + 1

rs.MoveNext

Next

注：rs 的記錄有　１２３４５６７條

Do 循環比 For 循環速度慢了　20%