Síntesis de voz

[vistaero]

Hola, acabo de comenzar un programa al que quiero dotar de dicha funcionalidad, y me he encontrado en internet varias veces este trozo de código:

Dim SAPI
SAPI = CreateObject("SAPI.spvoice")
SAPI.speak(Nombredelavariableconeltextoaleer)

Pero resulta que la voz es inglesa, y no he encontrado nada de utilidad para solucionarlo.

¿Alguien puede echarme un cable?

[RootK]

Pero resulta que la voz es inglesa, y no he encontrado nada de utilidad para solucionarlo.

Y cual es tu duda?

[vistaero]

Perdón por tardar tanto en responder.

Pues simplemente que me gustaría alguna forma de que sea una voz española. Me da igual de qué país sea el acento, con que se entiendan las frases estoy contento.