Un juego clásico con un texto es crear una historia e ir sustituyendo partes concreta
de la misma.
Podría tener la historia e ir concatenando variables con el texto de la historia o sustituyendo
una parte concreta del texto.
Ejemplo:
Private Const AMIGO1 As String = "Antonio"
Private Const AMIGO2 As String = "Marco"
Private Const COMIDA As String = "almorzar"
Private Const CONVERSACION As String = "negocios"
Public Sub Main()
Dim frase As String
frase = "AMIGO1 encontró a AMIGO2 y fueron a COMIDA.\n"
frase &= "Hablarón de CONVERSACION. "
frase = Replace(frase, "AMIGO1", AMIGO1)
frase = Replace(frase, "AMIGO2", AMIGO2)
frase = Replace(frase, "COMIDA", COMIDA)
frase = Replace(frase, "CONVERSACION", CONVERSACION)
Print frase
End
Private Const AMIGO2 As String = "Marco"
Private Const COMIDA As String = "almorzar"
Private Const CONVERSACION As String = "negocios"
Public Sub Main()
Dim frase As String
frase = "AMIGO1 encontró a AMIGO2 y fueron a COMIDA.\n"
frase &= "Hablarón de CONVERSACION. "
frase = Replace(frase, "AMIGO1", AMIGO1)
frase = Replace(frase, "AMIGO2", AMIGO2)
frase = Replace(frase, "COMIDA", COMIDA)
frase = Replace(frase, "CONVERSACION", CONVERSACION)
Print frase
End
Resultado:
Citar:
¿ Qué os parece mejor ?, ¿ concatenar o sustituir ?.
Ahora mismo no sé si la preposición "a" va bien con una palabra que comienza también con la letra "a".
Parece que suena raro, como si sobrase.
Saludos