VB InStr函数.doc