Bitte um Erläuterung: ByVal KeyAscii

In einer TextBox sollen nur ganze Zahlen eingegeben werden.
Zur Diskussion stehen zwei Varianten. Wodurch unterscheiden sich die beiden Prozeduren? Vor- und Nachteile?

Variante1:
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.returninteger)
If Chr(KeyAscii) Like "[0-9]" = False Then KeyAscii = 0
End Sub

Variante2:
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.returninteger)
Select Case KeyAscii
Case 48 To 57
Case Else: KeyAscii = 0
End Select
End Sub

Mit freundlichen Grüssen
Ernst