需要识别我的字符串的第一个字符（变量）

Question

我有一个名为Policynumber的字符串

我需要知道它是以1还是2开头所以我可以创建一个if语句，如果它以1开始做某事，如果它以2开头做其他事情。

我一直在寻找为字符串文本而不是变量的方法。

我尝试过以下操作：

If policynumber Like "1*" Then
    display.text = policynumber
End If

我只是在寻找可能的方法来了解第一个字符是什么，因此确定它是1还是2.当我尝试使用变量名称甚至是textbox.text时，我在显示文本框中没有得到任何结果所以我知道它不起作用。

Answer 1

为此，我会使用VBA的ASC（）函数。此函数返回字符串第一个字符的ASCII代码。字符1的ASCII为49，2为50.因此......

Dim PolicyNumber As String
Dim n As Integer

PolicNumber = "1ABC-45678910"
n = ASC(PolicyNumber)
MsgBox "Policy number starts with a " & Chr(n)

为了测试结果，您可以使用If n = 49 Then或If Chr(n) = "1" Then。