 |
| bilgisayarın ne zamandır açık vb.net |
Görselde de göründüğü gibi BAK butonununa tıklandığı zaman
bilgisayarın ne zamandır açık olduğunu ögrenebilirsiniz.
Lazım olanlar 1 tane textbox(Enablesi false olucak)sağ taraftan ayarlarısınız.
1 tane de buton butona basıldığı ne zamandır çalıştığı çıkıcaktır.
KODLAR:
Public Class Form1 'Visualbasicdersleri.com
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
Timer1.Start()
If e.KeyCode = Keys.Escape Then
If MessageBox.Show("Form kapatılsın mı?", "Çıkış", MessageBoxButtons.YesNo, _
MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) _
= Windows.Forms.DialogResult.Yes Then
Me.Close()
End If 'visualbasicdersleri.com
End If
End Sub
Public Function PC_Kac_Saat_Acik() As String
Dim SpyCoders As String = String.Empty
SpyCoders += Math.Round(Environment.TickCount / 86400000) & " gün, "
SpyCoders += Math.Round(Environment.TickCount / 3600000 Mod 24) & " saat, "
SpyCoders += Math.Round(Environment.TickCount / 120000 Mod 60) & " dakika, "
SpyCoders += Math.Round(Environment.TickCount / 1000 Mod 60) & " saniye."
Return SpyCoders
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = (PC_Kac_Saat_Acik()) 'buton1 re tıklandığı zaman textbox1 re pc nin gün saat dakika saniye dir açık olduğunu yazar
End Sub
End Class
Yapamıyan olursa videoyu izlesin yada yorum yapsın.
