1. 1.
    0
    dim i,x as integer
    x=3
    for i=1 to x
    list1.additem "açacağın konuyu gibeyim"
    x=x+2
    next i
    ···
   tümünü göster