Dim str As String = "@12345"If str.StartsWith("@") Then str = str.SubString(1) msgbox(str)End If
或者
Dim str As String = "@12345"str = str.trim("@")msgbox(str)