C#, Asp.Net, .Net Core
Vb 2008"De Kronometre Yapma.(Proje Linki İle Birlikte)
Vb 2008"De Kronometre Yapma.(Proje Linki İle Birlikte)
-
vb' ye yeni başlayanlar i
Gerekli olan tollbox nesneleri:::5 adet label 1 adet timer 1 tane buton..(label lerin 2 tanesi ": : " yapmak için kulanılcak ..gerekli kodlar aşağıdaki kodlardır..yapamazsanız proje linkinide veriyorum..
Public Class Form1Private Sub cmdislem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdislem.Click
If cmdislem.Text = "BaŸla" Then
cmdislem.Text = "Dur"
Timer1.Enabled = True
ElseIf cmdislem.Text = "Dur" Then
cmdislem.Text = "BaŸla"
Timer1.Enabled = False
End If
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickIf Val(lblbasamak3.Text) = 60 Then
lblbasamak2.Text = Val(lblbasamak2.Text) + 1
lblbasamak3.Text = 1
Else
lblbasamak3.Text = Val(lblbasamak3.Text) + 1
If Val(lblbasamak2.Text) = 60 Then
lblbasamak1.Text = Val(lblbasamak1.Text) + 1
lblbasamak2.Text = 1
End If
End If
End Sub
proje linki:::http://rapidshare.com/files/177285228/klorametre.rar umarım beğenilir..
-
helal olsun çok beğendim
-
Beğendiğine sevindim:D:D:
-
kronometre olmasın o :|
-
Arkadaşım sende hep eleştiri hep eleştiri bak adama ne güzel program yapmış ha klor ha krono:D
-
Alpn bunu yazdı:
-----------------------------
Arkadaşım sende hep eleştiri hep eleştiri bak adama ne güzel program yapmış ha klor ha krono:D
-----------------------------haklsın bi daha olmaz abi :(
:D
-
Enee kafkefhacker... Gene mi sen :D
Bu akşam EP5 çıkıyo haberin olsun ;)
-
kafkefhacker bunu yazdı:
-----------------------------vb' ye yeni başlayanlar i
Gerekli olan tollbox nesneleri:::5 adet label 1 adet timer 1 tane buton..(label lerin 2 tanesi ": : " yapmak için kulanılcak ..gerekli kodlar aşağıdaki kodlardır..yapamazsanız proje linkinide veriyorum..
Public Class Form1 Private Sub cmdislem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdislem.ClickIf cmdislem.Text = "BaŸla" Then
cmdislem.Text = "Dur"
Timer1.Enabled = True
ElseIf cmdislem.Text = "Dur" Then
cmdislem.Text = "BaŸla"
Timer1.Enabled = False
End If
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickIf Val(lblbasamak3.Text) = 60 Then
lblbasamak2.Text = Val(lblbasamak2.Text) + 1
lblbasamak3.Text = 1
Else
lblbasamak3.Text = Val(lblbasamak3.Text) + 1
If Val(lblbasamak2.Text) = 60 Then
lblbasamak1.Text = Val(lblbasamak1.Text) + 1
lblbasamak2.Text = 1
End If
End If
End Sub
proje linki:::http://rapidshare.com/files/177285228/klorametre.rar umarım beğenilir..
-----------------------------hacı program yazmadan çakıyorsan bana ulaş senle 1-2 proje yapalım...olurmu_?
-
ricin yazılım bölümüm az çok anlıyorum ulaşırım ben sana...