vb如何截取中间字符串？

Question

请教大家一个问题例如
字符串
“1111000021120080919”
想要截取 除去前9位 和 后8位之后 留下的中间字符串。这样的vb语句怎么写呢？？谢谢

Answer 1

msgbox mid("1111000021120080919",10,len("1111000021120080919")-17)'或:msgbox right(left("1111000021120080919",len("1111000021120080919")-8),len("1111000021120080919")-17)'或:msgbox left(right("1111000021120080919",len("1111000021120080919")-9),len("1111000021120080919")-17)

Answer 2

dim s as string
s = "1111000021120080919"
s=mid(s,10,len(s)-8)   
msgbox s

Answer 3

Private Sub Form_Load()
s = "1111000021120080919"
ss = Mid(s, 10, Len(s) - 9 - 8)
MsgBox ss
End Sub

Answer 4

dim s as string
s="1111000021120080919"
s=mid(s,10,len(s)-8)   
msgbox s

Answer 5

哎  原来有len啊我用的是这个
operid = Mid(reclist(j), 10, InStr(10, reclist(j), Right(reclist(j), 8)) - 10)够笨的