Dim LineNo as Integer LineNo = CStr(channel) \'This can have a value of 1 to 100 If LineNo = 1 then Text1.Text = "Line one selected" Elseif LineNo =