如何检查文本框是否以任何字母开头

Question

我正在尝试确定文本框中的文字是否以字母表中的任何字母开头。

这是我到目前为止所做的：

Dim Text As String = SearchTextBox.text
If Text.StartsWith("A-Za-z") Then
    'Do something..
Else

Answer 1

使用左侧功能。

If Left(textBox.Text, 1) = "B" Then
   'Do something
End if

或者如果你的意思是任何字母

If isnumeric(Left(textBox.Text, 1)) = False Then
   'Do something
End if

解决特殊字符。这将使其成为A-Z或a-z。

If Asc(Left(TextBox1.Text, 1)) > 64 And Asc(Left(TextBox1.Text, 1)) < 91 Or Asc(Left(TextBox1.Text, 1)) > 96 And Asc(Left(TextBox1.Text, 1)) < 123 Then
     'Do something
end if

Answer 2

怎么样：

If Text Like "[a-zA-Z]*" Then