Private Sub cmdSaveTask_Click()
    Dim intTask As Integer
    intTask = intTask + 1
    strTaskname(intTask) = txtTaskName.Text
    
    Savestring HKEY_LOCAL_MACHINE, "SOFTWARE\D-Code Software\Taskmaster Server\Tasks", "Task" & intTask, strTaskname(intTask)
    fraNewTask.Visible = False
End Sub