Advertisement
Guest User

Ispis brojeva sa korakom (basic 6.0)

a guest
Jan 27th, 2015
207
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Dim a As Integer
  2. Dim b As Integer
  3. Dim c As Single
  4.  
  5. a = Val(Text1.Text)
  6. b = Val(Text2.Text)
  7. c = Val(Text3.Text)
  8.  
  9. For i = a To b Step c
  10.  
  11.  
  12.  
  13.  
  14.  
  15.  
  16. List1.AddItem i
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement