Sólo Windows 98

Aquí tienes otro Control, en este caso viene como un archivo dll.Vtext.dll (169 K)
Microsoft Direct Text-to-Speech.

Private Sub Command1_Click()
TextToSpeech1.Speak ("Escribe una frase")
End Sub  

W98
Veamos otro control Multimedia lo puedes encontrar en el
CDROM de VisualBasic/os/System/MCI32.OCX,
aunque también lo puedes bajar de aquí MCI32.OCX (194 K)
Aunque podemos poner los controles en cualquier directorio, normalmente se guardan en C:\Windows\System,
guárdalo ahí y luego en Visual Basic marca :
Proyecto/Componentes/Controles/Microsoft Multimedia Control 6.0

En el formulario situa un botón, un PictureBox y el MMControl.
Luego en el botón escribe éste código :

Private Sub Command1_Click()

MMControl1.DeviceType = "AVIVideo"
MMControl1.FileName = "C:\Pon-un-archivo.avi"
MMControl1.Command = "open"
MMControl1.hWndDisplay = Picture1.hWnd

MMControl1.Command = "play"

End Sub


Calendario MSCAL.ocx

Function Oper