##
<> // 不等于
Call Plugin.File.CreateFolder("C:\Plugin")
Dim A
A = Array(10,20,20)
max = UBound(A,1)
min = LBound(A,1)
返回结果分别是最大下标2和最小下标0。
不定数组:
Dim a()
Redim a(4)
For i = 0 To 4
a(i) = mid("15258", i+1, 1)
TracePrint "第一次的值:"&a(i)
Next
Redim Preserve a(10)
For i = 0 To 10
TracePrint "第二次的值:"&a(i)
Next
Redim a(15)
For i = 0 To 15
TracePrint "第三次的值:"&a(i)
Next
error:
TracePrint "j=" & j+1& " "
OK:
TracePrint "j=" & j+1 & " "
删除:Shift + Delete