SelText alternative

[Kin®sole]

This may seen like an odd request but is there a longhand way of replacing
seltext in this piece of code?

For i = 1 To Len(Answer)
'Loop Through Each Letter In Answer
IsIn = False
For j = 0 To 25
'Loop Through Each Letter In Alphabet
If Not cmdLetters(j).E nabled Then
If Mid(Answer, i, 1) = Chr(j + 65) Then
IsIn = True
txtAnswer.SelTe xt = Chr(j + 65)
End If
End If
Next
If IsIn Then
Else
If Mid(Answer, i, 1) = " " Then
txtAnswer.SelTe xt = ""
Else
txtAnswer.SelTe xt = " * "
End If
End If
Next i