>> 小弟弟??1: 如果字符串定长,那么简单的截取即可如 strPart1=Left(strAll,10) strPart2=Right(strAll,10)如果不定长,则从第一位开始起判断其是否为数字,前提是楼主已经说明的:前半段是字母,后半段是数字Dim i As Integer For i=1 To Len(strAll) If ASc(Mid(strAll,i,1))<=57 Then Exit For End If NextstrPart1=Left(strAll,i-1) strPart1=Right(strAll,Len(strAll)-i+1)2: 这个基础问题,,, strX=Right(strAll,2)
Function Right$(String As String, Length As Long) As String VBA.Strings 的成员 从字符串的右边起,返回指定数目的字符Function Asc(String As String) As Integer VBA.Strings 的成员 返回一个字符串中第一个字符的 ANSI 字符代码Function Len(Expression) VBA.Strings 的成员 返回存储一个变量所需的字符串的长度和字节数
如果字符串定长,那么简单的截取即可如 strPart1=Left(strAll,10)
strPart2=Right(strAll,10)如果不定长,则从第一位开始起判断其是否为数字,前提是楼主已经说明的:前半段是字母,后半段是数字Dim i As Integer
For i=1 To Len(strAll)
If ASc(Mid(strAll,i,1))<=57 Then
Exit For
End If
NextstrPart1=Left(strAll,i-1)
strPart1=Right(strAll,Len(strAll)-i+1)2:
这个基础问题,,, strX=Right(strAll,2)
VBA.Strings 的成员
从字符串的右边起,返回指定数目的字符Function Asc(String As String) As Integer
VBA.Strings 的成员
返回一个字符串中第一个字符的 ANSI 字符代码Function Len(Expression)
VBA.Strings 的成员
返回存储一个变量所需的字符串的长度和字节数