array.vb

来自「脚本处理控件源码,支持的脚本格式有:Pascal,C++,JScript,Bas」· VB 代码 · 共 22 行

'**************************
' FastScript v1.0          
' Arrays demo              
'**************************

dim i, j
dim ar[10]
dim s

for i = 0 to 9
  ar[i] = IntToStr(i)
next

s = ""
for i = 0 to 9 
  s = s + ar[i]
next

ShowMessage(s)