'========================================================================== ' ' VBScript: AUTHOR: Ed Wilson , MS, 7/29/2006 ' ' NAME: FunString.vbs ' ' COMMENT: Key concepts are listed below: '1.FunString is same as intrinsic function '2. '3. '========================================================================== Option Explicit WScript.Echo "Intrinsic string function",VbCrLf,string(15,"-") WScript.Echo "User string function",VbCrLf,funString(15,"-") ' **** function below **** Function funString(intIN,strChar) Dim j For j = 1 To intIN funString = funString & strChar Next End Function