Dim Letter1 As String = "0", Letter2 As String = "0", Letter3 As String = "0", Letter4 As String = "0", Letter5 As String = "0"