Никак не пойму, где у TextBox свойство Read-Only - VB

Формулировка задачи:

имеется textbox со значением 0, как сделать ее не изменяемой ? изменяется только при вычислении, пользователь не может менять значения + если нажмет Backspace снова станет 0 и 0 не стерятся

Решение задачи: «Никак не пойму, где у TextBox свойство Read-Only»

textual
                            Листинг программы 
                        

                            Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case Is = 8: Text1 = 0
Case 48 To 57: KeyAscii = KeyAscii
Case Else: KeyAscii = 0
End Select
End Sub
                        