Bilgisayar kapatma programı Vb.Net

Bilgisayar kapatma programı Vb.Net

[code lang=”vb”]

Public Class Form1

Private Sub btnKapat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnKapat.Click
timer1.Start()
End Sub

Private Sub timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles timer1.Tick
If (Convert.ToString(DateTime.Now.Second) = Convert.ToString(numericUpDown1.Value)) Then
‘www.gorselprogramlama.com/
If (Convert.ToString(DateTime.Now.Minute) = Convert.ToString(numericUpDown2.Value)) Then
If (Convert.ToString(DateTime.Now.Hour) = Convert.ToString(numericUpDown3.Value)) Then
‘www.gorselprogramlama.com/
System.Diagnostics.Process.Start("shutdown", "-f -s")
End If
‘www.gorselprogramlama.com/
End If
End If
End Sub
End Class

[/code]

Dosyayı İNDİR

Yorumlar 2

  • Merhaba kodlar VB 12 de çalışmıyor. değişik hatalar veiyor. ilgilene bilirmisiniz?

  • Ramazan bilgi :
    Crystal reports farklı bir sürüm kullandığı için versiyonlarda sorunlar olabilir.

Bir yanıt yazın

E-posta adresiniz yayınlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir