語法: InStr(字串,要找的字串)
例:
st1 = "L11B01A-1"
'抓取st1字串"-"之前的文字
'InStr=8 結果顯示為:L11B01A
MsgBox Mid(st1, 1, InStr(st1, "-") - 1), vbOKOnly, InStr(st1, "-")
'抓取st1字串"-"之後的文字
'InStr=8 結果顯示為:1
MsgBox Mid(st1, InStr(st1, "-") + 1, Len(st1)), vbOKOnly, InStr(st1, "-")
延伸閱讀: 使用word開啟網頁資料,可以將網頁下載存成WORD檔.
沒有留言:
張貼留言