[hassantawfic]

s[

B]elect the error in the following code [/B]
Dim J as Byte
for J=1 TO 500 step 3
Listbox1.Items.Add()
Loop
a) you must use the Do..While rather than For..Next
b) It is an endless loop
c)Error in variable type in the loop