vb 截取固定字符串之間的 字符

描述: 從一個字符串中截取到 固定兩個字符串之間的 字符

  例子：截取  假如今天是星期四：5分 這句話中的  5 字

  

        Dim s As String
        Dim l As Long
        Dim szText As String
        s = TextBox2.Text
        l = InStr(s, "星期四")  ‘獲取想要的特殊字符的位置
        TextBox3.Text = Mid(s, l, 5)  ’截取到位置後開始 取數字5的位置
        szText = Mid(TextBox3.Text, 5)
        TextBox3.Text = szText