Ree*_*sey 32
鉴于:
Dim strOrig = "010451-09F2"
Run Code Online (Sandbox Code Playgroud)
您可以执行以下任何操作:
Dim leftString = strOrig.Substring(0, strOrig.IndexOf("-"))
Run Code Online (Sandbox Code Playgroud)
要么:
Dim leftString = strOrig.Split("-"c)(0) ' Take the first index in the array
Run Code Online (Sandbox Code Playgroud)
要么:
Dim leftString = Left(strOrig, InStr(strOrig, "-"))
' Could also be: Mid(strOrig, 0, InStr(strOrig, "-"))
Run Code Online (Sandbox Code Playgroud)
Dim str As String = "010451-09F2"
Dim leftPart As String = str.Split("-")(0)
Run Code Online (Sandbox Code Playgroud)
Split为您提供字符串数组中的左右部分.访问第一个元素(索引0)将为您提供左侧部分.
小智 0
首先获取破折号的位置(或内联执行),然后将该值用于左侧。这是老式的 VBA,但它会是这样的:
左(YourStringWithTheDash,InStr(YourStringWithTheDash)-1)