/ Published in: Visual Basic

Expand |
Embed | Plain Text
text="1234567890" WScript.StdOut.WriteLine "World!" WScript.StdOut.WriteLine Left(text,5) WScript.StdOut.WriteLine Right(text,5) WScript.StdOut.WriteLine Mid(text,2,5) WScript.StdOut.WriteLine Chr(69) pos=InStr(text,"567") WScript.StdOut.WriteLine pos pos=InStrRev(text,"67") WScript.StdOut.WriteLine pos WScript.StdOut.WriteLine StrReverse(text) WScript.StdOut.WriteLine Replace(text,"567","ooo") WScript.StdOut.WriteLine len(text) WScript.StdOut.WriteLine StrComp(text,text) WScript.StdOut.WriteLine StrComp(text,"ddd") a=Split(text,"3") WScript.StdOut.WriteLine a(1) b=Filter(a,"2") WScript.StdOut.WriteLine a(0) WScript.StdOut.WriteLine trim (" " & text)
You need to login to post a comment.