Código de Visual Basic para Aplicaciones - Funcion recursiva para girar una cadena

Imágen de perfil
Val: 8
Ha disminuido su posición en 20 puestos en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Funcion recursiva para girar una cadenagráfica de visualizaciones


Visual Basic para Aplicaciones

Publicado el 11 de Febrero del 2020 por Info (96 códigos)
667 visualizaciones desde el 11 de Febrero del 2020
Este código de ejemplo, muestra como girar una cadena de forma recursiva.

1

Publicado el 11 de Febrero del 2020gráfica de visualizaciones de la versión: 1
668 visualizaciones desde el 11 de Febrero del 2020
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella

1
2
3
4
5
6
7
8
9
10
11
12
Public Function RReverse(aString As String) As String
	Dim L As Integer    'longitud de la cadena
	Dim M As Integer    'punto de corte
 
	L = Len(aString)
	If L <= 1 Then   'Final... ya no es necesario utilizar la recursividad
		RReverse = aString
	Else
		M = Int(L / 2)
		RReverse = RReverse(Right$(aString, L - M)) & RReverse(Left$(aString, M))
	End If
End Function



Comentarios sobre la versión: 1 (0)


No hay comentarios
 

Comentar la versión: 1

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios...
CerrarCerrar
CerrarCerrar
Cerrar

Tienes que ser un usuario registrado para poder insertar imágenes, archivos y/o videos.

Puedes registrarte o validarte desde aquí.

Codigo
Negrita
Subrayado
Tachado
Cursiva
Insertar enlace
Imagen externa
Emoticon
Tabular
Centrar
Titulo
Linea
Disminuir
Aumentar
Vista preliminar
sonreir
dientes
lengua
guiño
enfadado
confundido
llorar
avergonzado
sorprendido
triste
sol
estrella
jarra
camara
taza de cafe
email
beso
bombilla
amor
mal
bien
Es necesario revisar y aceptar las políticas de privacidad

http://lwp-l.com/s5895