Sure thing, thanks.
I thought it was because this code
Dim p As PhoneEvents
Dim PID As PhoneId
p.InitializeWithPhoneState("test",PID)
TTS.Initialize("TTS2")
was in the Activity_Resume, but I've also tried it in the Activity_Create too and it does the same thing.
If you run the project in debug (rapid) mode, press the button to make it speak the once, then put a breakpoint on the counter = counter + 1 line in the test_TextToSpeechFinish event, and press the button again to make it speak, you'll see the counter is now 2, when it should really be one?
Cheers,
Richard