Merhaba arkadaşlar ufak çaplı bir program yazıyorum şimdi ben timer'a bir kod yazdım ve bu kod textbox'un içindeki yazıyı otomatik olarak belirlediğim yere kadar gidiyor vve orada kalıyor ben başa dönmesini istiyorum. kod bu:
Private Sub Timer2_Timer() Static a As Integer a = a + 1
If a = 1 Then Text1.Text = "merhaba" End If If a = 2 Then Text1.Text = "nasılsın" End If If a = 3 Then Text1.Text = "evdemisin" End If If a = 4 Then Text1.Text = "başa dön" End If If a = 5 Then Text1.Text = "lütfen" End If End Sub
buradan sonra başa dönmesini istiyorum "lütfen" yazdıktan "merhaba" yazısına geri dönmesini istiyorum.
fable
kullanıcısına yanıt
VB ile pek alakam yok ama a=5 olduktan sonra "Text1.Text = "lütfen""'den sonra if'i bitirmeden a=0 yapabilirsin. Bu sayede timer çalıştığında a değeri yine 1 olur ve "merhaba"dan başlayarak tekrar eder.
GorunmezBKZ
kullanıcısına yanıt
Yapamadım hocam yani sonradan
If a = 5 Then Text1.Text = "lütfen" End If
ben şu şekilde yaptım If a = 0 Then Text1.Text = "merhaba" End If bunu ekstra olarak ekledim. Olmadı acemisiyim biraz.
fable
kullanıcısına yanıt
Hocam siz "lütfen" yazısından sonra "merhaba"ya dönüp durmasını mı istiyorsunuz? Yoksa sürekli olarak "merhaba" "nasılsın" ... "lütfen" "merhaba" "nasılsın" gibi devam etmesini mi?
Eğer sürekli olarak tekrar etmesini istiyorsanız:
If a = 5 Then Text1.Text = "lütfen" a = 0 End If
"lütfen"den sonra "merhaba" yazısında kalmasını istiyorsanız:
If a = 6 Then Text1.Text = "merhaba" End If
yapabilirsiniz. "merhaba" yazısında kalmasını başka yollarla da sağlayabilirsiniz belki ama aklıma bu geldi.
saol hocam ilk verdiğiniz kod oldu teşekkğr ederim.
yeni mesaja git
Yeni mesajları sizin için sürekli kontrol ediyoruz, bir mesaj yazılırsa otomatik yükleyeceğiz.Bir Daha Gösterme