

NumericUpDownhrs.Value = My.Settings.hours Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Private Sub closeb_Click(sender As Object, e As EventArgs) Handles closeb.Click Private Sub feedbackb_Click(sender As Object, e As EventArgs) Handles feedbackb.Click Private Sub updateb_Click(sender As Object, e As EventArgs) Handles updateb.Click If updateb.Location = Updatebutton.Location Then Private Sub moretimer_Tick(sender As Object, e As EventArgs) Handles moretimer.Tick Private Sub more_Click(sender As Object, e As EventArgs) Handles more.Click If timeup.Location = labeltimeup.Location Then Private Sub endtime_Tick(sender As Object, e As EventArgs) Handles endtime.Tick Private Sub starttime_Tick(sender As Object, e As EventArgs) Handles starttime.Tick If checkdone = True And checkoff = True Then If Me.Height = vmin And Hrs >= vhrs And Sec >= vsec Then If RadioButton1.Location = RadioButton5.Location Then Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick Private Sub Panel2_MouseDown(sender As Object, e As MouseEventArgs) Handles Panel2.MouseDown, time.MouseDown, timeup.MouseDown Private Sub Panel2_MouseMove(sender As Object, e As MouseEventArgs) Handles Panel2.MouseMove, time.MouseMove, timeup.MouseMove

' IO.File.SetAttributes("C:\Users\DigiParent\Desktop\Project data\Digitimeinfo.txt", IO.FileAttributes.Hidden)ĭim timeChecker As New System.IO.StreamWriter(timeinfo, True)ĭim readertime As New System.IO.StreamReader(timeinfo, Encoding.Default)ĭim texttime As String = readertime.ReadToEndĭim timeobjWriter As New System.IO.StreamWriter(timeinfo, True)ĭim startup As String = "C:\Users\DigiParent\Desktop\Project data\good.txt"ĭim reader As New System.IO.StreamReader(startup, Encoding.Default) Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Loadĭim timeinfo As String = "C:\Users\DigiParent\Desktop\Project data\good.txt" 'wrongn height when make timer unstopable 'use application setting boolean to not add same application to startup more than once 'My.("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).DeleteValue(Application.ProductName) ' My.("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).SetValue(Application.ProductName, Application.ExecutablePath)
#How to make a computer program from start to finish code
I've posted my code for my program bellow if it's any help.

I'm developing a timer for my kids that will automatically shut down the computer once the time is up and I was trying to figure out a way that the program would automatically restart if it were to be closed via task manager.
