Visual Basic De Label1 Text Yardım Gerek

[UgurOzturk]

Öncelikle Herkeze iyi Akşamlar,

Aslında Basit olan yardım isteyeceğim konuyu nedense yapamadım :\ php biraz biliyorum fakat Visual Basic de php dili tutmadı tabiki

Yapmam Gereken şu ;
1 Tane Timer ve 1 Tane Label olucak, Timer Ayarlanmış Zaman bittikten sonra Label deki değer 1 Artıcak.
Yani Timer 5 sn ayarlanmış olsun, Label de Başlangıç 0 olsun, 5sn yede 1 kere Label deki Sayı 1 artıcak

Bunun için Yardımcı olabilicek var mı acaba ?

Edited March 7, 2011 by taran9313

[galetis]

Label ve timer ekledin varsayıyorum. Timer'in süresini ayarladıktan sonra içine şu kodları gir.
[code]
Label1.Text = Label1.Text + 1
[/code]

Form1_Load bölümünede şu kodları girmen yeterli olacaktır
[code]
Label1.Text = 1
Timer1.Start()
[/code]

[KintaRo]

Bu konu "Webmaster İstek" forumundan "Yazılım" forumuna taşınmıştır.

[sk8er_boi]

Label1.text değil Labe1l.caption olacak tabiki.

[UgurOzturk]

Sayın galetis'in dediğini Yaptım Visual Basic 2010 da çalıştı Aklımda Değişik bir tane proje var da iframe yöntemiyle Link kısaltıp para kazandıran sitelerde uygulama yapıcam, Program'ı kurdum Şimdi sıra geldi farklı ip lerden girme Yöntemini bulmaya bu sayede link kısaltarak para kazandıran sitelerden tek ip den 1 puan verme sistemini aşmaya çalışıcağım.

[code]Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.Text = 0
WebBrowser1.Hide()
End Sub

Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = Label1.Text + 1
WebBrowser1.Refresh()
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Navigate("http://www.tlinkpara.com/l/MzU4ODYz")
Timer1.Start()
End Sub

Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

End Sub
End Class

[/code]

DipNot: Eğer Düşüncem Kesinlikle uygunsuz ve Ceza verilebilicek birşey ise Lütfen Uyarınız

[sk8er_boi]

VB6 sanmıştım