function is web ???

What is wrong with this code ???

for i as integer = self.controlCount downTo 0 if self.controlAtIndex(i) is customButton then dim iw as customButton = self.controlAtIndex(i) iw.status = false end if next

Solved, thanks

[code]Function SelectButton() As boolean
for i as integer = self.controlCount downTo 0
if self.controlAtIndex(i) isa customButton then
dim iw as customButton = customButton(self.controlAtIndex(i))
iw.status = false
end if
next

return true
End Function
[/code]

Quack

… says the rubber duck.