End If
If str(4) = "f" Then
Chr13.Text = "F"
End If
If str(5) = "f" Then
Chr12.Text = "F"
End If
If str(6) = "f" Then
Chr11.Text = "F"
End If
If str(7) = "f" Then
Chr10.Text = "F"
End If
If str(8) = "f" Then
Chr9.Text = "F"
End If
If str(9) = "f" Then
Chr8.Text = "F"