Question

求高手指教，VB如何获得一断字符串里面其中两个字符之间的内容

Answer 1

如果你这两个字符是在字符串中是唯一的，可用以下代码
Dim i, j, k As Integer
Dim str As String
For i = 1 To Len(Me.字符串名称)
If Mid(Me.字符串名称, i, 1) = "字符1名称" Then j = i + 1
If Mid(Me.字符串名称, i, 1) = "字符2名称" Then
k = i
str = Mid(Me.字符串名称, j, (Len(Me.字符串名称) - k))
Exit For
End If
Next
将这段代码拷到你需要的事件中去就好了

追问

但是第一个，跟最后一个

追答

但是第一个，跟最后一个
这是什么意思

追问

“中另{在VB{中处理}excel}加因”，
比如上面这个字符串，第一个“{”跟最后一个“}”之间的内容

Answer 2

如果不包括这两个字符
s = "获得一断字符串里面";
x1 = InStr(s, "得“)
x2 = InStr(s, "里")
s1 = mid(x1+1, x2-x1-1)

s1 就等于“一断字符串”

Answer 3

Private Sub Form_Load()
Dim sTemp As String

sTemp = "12a324a23"

MsgBox Mid(sTemp, InStr(sTemp, "a") + 1, InStrRev(sTemp, "a") - InStr(sTemp, "a") - 1)
End Sub