Option Explicit Public strMyNick As String Public intTasks As Integer Public strTask As String Public strTaskname(11) As String Public strTaskObjective(11) As String Public bNewTask As Boolean Public bOnline As Boolean