Private Sub cmdDelTask_Click() ' This works, except for registry string removal Dim strMessage As String, strTitle As String Dim strResult As String strMessage = "Are you sure you want to delete this task? This will also remove it from the main task list." strTitle = "Task Removal" strResult = MsgBox(strMessage, vbYesNo, strTitle) If strResult = "6" Then lstToDo.RemoveItem lstToDo.ListIndex ' Remove Item Highlighted DeleteValue HKEY_LOCAL_MACHINE, "SOFTWARE\D-Code Software\Taskmaster Server\Tasks", "Task" & lstToDo.ListIndex Else Exit Sub End If End Sub