Kod:
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
Dim okut
okut = CreateObject("SAPI.spvoice")
okut.speak("This software written by A Jacob for education")
MsgBox("Bu program A.Yakup tarafından eğitim amaçlı yazılmıştır" & Chr(13) & "This software written by A. Yakup for education", MsgBoxStyle.Information, "Hakkında")
End Sub
End Class
Muhtemelen çok kolay birşey & veya , eklicez büyük ihtimalle ama yapamadım


