Buon giorno
ho la necessit di contare le righe inserite nel men di un BevelButton
per leggerne i valori utilizzando un ciclo for/next.
Ho cercato ma non sono riuscito a trovare il comando che mi conta le righe.
Qualcuno lo ha trovato?
Ci sono modi migliori per leggere i valori delle righe inserite?
Grazie
Enzo
Metti in un modulo:
Public Function ListCount(extends b as BevelButton) as Integer
If b.HasMenu>0 Then
Dim x As String
Dim i As Integer
#pragma BreakOnExceptions False
While True
Try
x=b.List(i)
Catch
Exit
End Try
i=i+1
Wend
#pragma BreakOnExceptions Auto
Return i
End If
End Function
come per la listbox o i menu ti restituisce il count ovvero ubound+1
Ciao Antonio, grazie!!
Immaginavo che tu una soluzione la trovavi…
per una domanda mi sorge spontanea,
ci sono tutti i comandi per gestire il menu come un pupup o un qualsiasi array, perch non hanno messo anche il comando che restituisce la quantit di elementi contenuti?
Misteri dell’informatica…
In ogni caso sono sempre in dovere di ringraziarti per il tuo interessamento.
Enzo
come si aggiungono i submenù al bevelbutton e come si intercetta il click? Grazie