for.vb

来自「FastScript 1.94 Full Source」· VB 代码 · 共 20 行

' FastScript v1.0          
' 'For' operator demo      


dim i

  for i = 0 to 9
    if i = 1 then 
      ShowMessage(1)
    elseif i = 2 then 
      ShowMessage(2)
    elseif i = 3 then 
      ShowMessage(3)
    elseif i = 4 then 
      ShowMessage(4)
    elseif i = 5 then 
      ShowMessage(5)
    end if
  next