Selamlar

Private Sub Command1_Click()
Timer1.Enabled = True

End Sub

Private Sub Command2_Click()
Timer1.Enabled = False

End Sub

Private Sub Timer1_Timer()
Timer1.Interval = 1000
SendKeys "Ben SystemTheSie Nasılsınız"
SendKeys ("")
SendKeys "Visual basic ile ilgili bir sorunum var"
SendKeys ("")
SendKeys "İnşallah yardım bulurum"
SendKeys ("")
End Sub




Buradaki 3 tane cumleyi notepad defterine yazdırmak istiyorum fakat hepsini aynı anda yazıyor.Benim istediğim ilk cumleyi yazdıktan 10 sn sonra ikinci cumleyi yazması.

Yaklaşık olarak boyle 50 tane cumle yazacağım. Sıralı bir halde yazmasını istiyorum.Yukarıdaki gibi yaptığım zaman hepsini aynı anda yolluyor. Cumlelerin hepsi farklı olacak.

Teşekkurler .
__________________