https://foro.gambas-es.org/viewtopic.php?f=1&t=7158&p=43140#p43140
-----------------------------------
Shell
Viernes, 21 Septiembre 2018, 00:47

Re: ¿ Existe Una Propiedad Como "index" En Cadenas O Arrays ?
-----------------------------------
Shordi:

[quote]
La función instr tiene tres parámetros. El tercero sirve de el index que tú mencionas... más o menos...
[/quote]

Es algo que he usado y no recordaba cuando pregunté.  :roll: 

Tenemos tanto para que busque por el comienzo: [b]Instr[/b]
Como para que busque desde el final: [b]RInstr[/b]

Ahora bien. ¿ Qué pasa si se repite más de una vez el carácter en la cadena  ?..  :razz: 

[code linenumbers=false syntax=gambas]
Public Sub Main()
  
  Dim cadena As String
  Dim posiciones As Integer[]
  
  cadena = "palabra"
  
  posiciones = ObtenerIndicesCaracterEnCadena(cadena, "a")
  
End

Public Function ObtenerIndicesCaracterEnCadena(cadena As String, letra As String) As Integer[] ''Obtiene los indices de un caracter que se repite en una cadena
  
  Dim indices As New Integer[]
  Dim posicion As Integer
  
  posicion = InStr(cadena, letra)    
  While posicion > 0 And posicion <= String.Len(cadena)
    indices.Add(posicion)      
    posicion = InStr(cadena, letra, posicion + 1)
  Wend     
  Return indices
  
End
[/code]

Resultado:
[quote]
[ 2, 4, 7 ]
[/quote]

Vuott:

[quote]
Es el Método " .Find( ) " del objeto Array.
[/quote]

Y al igual se puede hacer un ejemplo similar al de arriba pero en un array de cadenas.

Son olvidos que tengo. Bueno esta recordarlo. Y bueno seria que tengamos ejemplos nuestros con estas cosas.  :sad: 

Saludos


