Question

vb 中如何从字符串的右端第n个位置开始截取指定长度的字符串?

Answer 1

可以用mid()函数实现
mid(x,n1,n2) 从字符串x左起第n1个字符开始连续取其中的n2个字符
如: a=mid("中国12亿",2,3) 则a为"国12"
以下摘自msdn
Dim x, a,b, c
x = "Mid Function Demo" '建立一个字符串
a = Mid(x, 1, 3) ' 返回 "Mid"
b = Mid(x, 14, 4) ' 返回 "Demo"
c = Mid(x, 5) ' 返回 "Funcion Demo"

Answer 2

Private Sub Command1_click()
s = "vb 中如何从字符串的右端第n个位置开始截取指定长度的字符串?"
Print MidR(s, 10, 5) '从右边第10个开始向后取5个
Print StrReverse(Mid(StrReverse(s), 10, 5)) '从右边第10个开始向前取5个
End Sub

Function MidR(bString, ByVal bStart As Long, ByVal bLength)
If bLength < 1 Then bLength = Len(bString)
bStart = Len(bString) - bStart + 1
If bStart < 1 Then bStart = 1
MidR = Mid(bString, bStart, bLength)
End Function

Answer 3

left(right("123456",X),Y)
从右边第X+1个位置上截取Y个字符
比如你想要右手边第四个字符开始取2个字符则
left(right("123456",3),2)

Answer 4

Function Mid(String, Start As Long, [Length])

起始点自己用字符串长度算下

Answer 5

你们写的都不全好多字母都没有给定义 代码也写的乱糟糟中英结合根本看不懂