Powerpoint'te MsAgent

[defective1907]

Powerpoint te msagent - merlin oluşturmaya çalışıyorum ama beceremiyorum...

Bazı örnek vb kodları buldum ancak powerpoint te bu kodları çalıştıramıyorum...

Powerpoint te buton ekleyip kodları aynen kopyaladım ancak çalıştıramıyorum...


Dim merlin As IAgentCtlCharacter
Const datapath = "\deneme\merlin.acs"
merlin.Speak "EĞİLİP SELAM VERİYORUM"
merlin.Play "Uncertain" 'EĞİLİP SELAM VERİR
Private Sub CommandButton1_Click()
merlin.Speak "Üzgünüm - Yanlış"
merlin.Play "Idle1_4"
End Sub

Private Sub CommandButton2_Click()
merlin.Speak "Üzgünüm - Yanlış"
merlin.Play "Idle1_4"
End Sub

Private Sub CommandButton3_Click()
merlin.Speak "Tebrikler - Doğru Cevap"
merlin.Play "Explain" 'ELLERİNİ İKİ YANA AÇAR
End Sub

Private Sub CommandButton4_Click()
merlin.Speak "Üzgünüm - Yanlış"
merlin.Play "Idle1_4"
End Sub

Private Sub CommandButton5_Click()
merlin.Speak "Üzgünüm - Yanlış"
merlin.Play "Idle1_4"
End Sub


kodlar bu şekilde...

eksiğim sanırım Powerpoint le ilgili...

yardımcı olursanız sevinirim...

18 Ocak 2009 Pazartesi gunune ödev yetiştirmem gerekiyor...