tütüne son
   
  visualbasicnetdersleri
  Monitörün Camını Tıklat
 
Gerekenler:Project menüsünden components(ctrl + t) tıklayın gelen bölümde Microsoft Agent Control 2.0 seçin

*************************

Dim merlin As IAgentCtlCharacterEx
Const DATAPATH = "merlin.acs"



Private Sub Command1_Click()
merlin.Speak "MONİTÖRÜN CAMINA TIKLIYORUM"
merlin.Play "GetAttention" 'MONİTÖRÜN CAMINA TIKLAR GetAttentionContinued
End Sub

Private Sub Form_Load()
Agent1.Characters.Load "merlin.acs", DATAPATH
Set merlin = Agent1.Characters("merlin.acs")
merlin.LanguageID = &H409
merlin.Show 'MERLİNİ GÖSTERİR
End Sub
*************************
 
  Bugün 11 ziyaretçi (45 klik) kişi burdaydı!  
 
--> Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol