【软件自动化测试 - VBScript 6】== Example of Split, Instr, Mid functions
str="ThisatestforInStrsplitlbounduboundmid"Dimaa=split(str,"")'msgboxlbound(a)'msgboxubound(a)Fori=lbound(a)toUbound(a) msgbox(a(i))next'rec=InStr(1,str,"recorded",1)'msgboxrec'Returnforsecondspacep