es cosa de ir programando los algoritmos. con respecto a eso de frases al voleo, creo que podrias configurarlo paras que digiera una pregunta o respuesta universal, depende del caso..que le quedase a cualquier pregunta ....o respuesta....
El problema esque nunca he programado algoritmos.
El problema que tiene las frases esas ya predeterminadas esque si te pregunta siempre Hola, siempre saldra la misma contestacion que tu tienes puesto...Estoy utilizando este codigo.
If InStr(Text1, "Hola") Then
Text1 = ""
Text2 = Text2 & R2 & vbCrLf & "<< R2 >> Hola,¿que tal?" & vbCrLf
End If
No se como podria ponerle para que una vez dijera "Hola, ¿que tal? y otra vez Hola a secas...y asi sucesivamente