Re: Can't get IsA operator to work

[Phil Heycock <pheycock at bellsouth dot net>]

on 8/27/04 10:08 PM, Wayne Dreier at realbasicnovice at MacDialUp dot com wrote:
> If i change the code to:
> 
>  Dim I As Integer
>  Dim CC As Integer
>  CC = Search.ControlCount
>  Do Until I = Search.ControlCount -1
>    If Search.Control(I) IsA PopupMenu Then
>      PopupMenu1(I).ListIndex = 0
>    End If
>    I = I + 1
>  Loop
> 
*********************************
Try:
If PopupMenu1.ListCount > 0 Then PopupMenu1(I).ListIndex = 0

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://www.realsoftware.com/listarchives/lists.html>