www.pudn.com > FastScript15.rar > if.vb


' FastScript v1.0           
' 'If' operator demo        
 
 
dim i 
 
  i = 10 
  if i = 10 then i = 1 
 
  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