una subcadena dentro de una cadena

Foro de elhacker.net

Programación

Programación General

.NET (C#, VB.NET, ASP)

Programación Visual Basic (Moderadores: LeandroA, seba123neo)

una subcadena dentro de una cadena

0 Usuarios y 1 Visitante están viendo este tema.

Páginas: [1]

Autor

Tema: una subcadena dentro de una cadena (Leído 6,851 veces)

minette1988

Desconectado

Mensajes: 53

una subcadena dentro de una cadena

« en: 23 Mayo 2010, 18:31 pm »

Hola, tengo que hacer un script en visual basic que me cuente cuantas veces aparece una subcadena dentro de una cadena. No me aclaro Ej: estrella La letra e aparece dos veces
Debo introducir la cadena de teclado usando InputBox.


	En línea

Psyke1

Wiki

Desconectado

Mensajes: 1.089

Re: una subcadena dentro de una cadena

« Respuesta #1 en: 23 Mayo 2010, 20:32 pm »

Código

Private Sub Command1_Click ()
    Dim Veces As Integer
    Dim Busco As String, miCadena As String
    miCadena = "estrella"
    Busco = "e"
    Veces = InStr(Cadena, Busco)
    Msgbox "La letra " & Busco & " se repite en la cadena " & miCadena & " : " & Veces & " veces"
End Sub

Creo que eso lo que buscas...

No obstante te recomiendo echar un vistazo a esto : http://www.recursosvisualbasic.com.ar/htm/tutoriales/tutorial-basico5.htm#instr

Salu2!


« Última modificación: 24 Mayo 2010, 16:51 pm por PsYkE1 »	En línea

http://foro.h-sec.org/

Dessa

Desconectado

Mensajes: 624

Re: una subcadena dentro de una cadena

« Respuesta #2 en: 24 Mayo 2010, 16:31 pm »

Creo que lo que pregunta minette no es la posicion de la primera vez que aparece la subcadena sino la cantidad de veces que esta se repite dentro de la cadena.

Código:


Option Explicit

Function Contar(cadena As String, subcadena As String) As Long
  Dim s() As String: s = Split(cadena, subcadena): Contar = UBound(s)
End Function

Private Sub Form_Load()
  MsgBox Contar("estrella", "e")
End Sub


	En línea

Adrian Desanti

Páginas: [1]

Ir a:

Mensajes similares
	Asunto	Iniciado por	Respuestas	Vistas	Último mensaje
	[PREGUNTA] Compilar con una cadena de texto (mala descripcion lean dentro) Programación Visual Basic	79137913	7	3,849	29 Enero 2011, 06:44 am por .mokk.
	[C] Contar subcadena en una cadena Programación C/C++	_*p	0	4,588	18 Febrero 2011, 19:18 pm por _*p
	UBICAR CADENA EXACTA DENTRO DE OTRA PHP	dperniam	3	4,740	30 Diciembre 2011, 04:29 am por Og.
	Dividir cadena en subcadena C++ Programación C/C++	gomezjuan	4	5,561	18 Mayo 2020, 12:53 pm por gomezjuan
	De una cadena, quitar la subcadena especificada, tantas veces como se repita. Programación General	Tachikomaia	1	1,828	22 Diciembre 2024, 15:51 pm por EdePC