Dim n as integer For n=( I=1; I<=20; I++) If( i%3==0&& i%5==5) then Else If ( i%3==0) Else If ( i%5==0) End End if End Sub