程式碼:  


輸 出:  

 

  • Source

    <HTML>
    <HEAD>
       <TITLE>Java Script 程式測試師</TITLE>
    </HEAD>
    <BODY>
    <SCRIPT Language="JavaScript">
       function RunIt() {
          _line = document.RunJs.Code.value.split("\r\n");
          _out = document.RunJs.Debug.value;
          for ( _i=0; _i<_line.length; _i++) {
             if ( _line[_i].substring(0, 5) == "print" ) {
                _ret = eval(_line[_i].substring(6, 9999));
                _out = _out + _ret + "\r\n";
                document.RunJs.Debug.value = _out;
             }
             else eval(_line[_i]);
          }
       }
       function ClearIt() {
          document.RunJs.Debug.value = "";
       }
    </SCRIPT>
    
    <FORM Name=RunJs>
    程式碼:  <INPUT Type=Button Value="Run" OnClick="RunIt();"><P>
    <TEXTAREA Name=Code Rows=5 Cols=80></TEXTAREA>
    <P>
    <HR WIDTH=100%>
    輸 出:   <INPUT Type=Button Value="清除" OnClick="ClearIt();"><P>
    <TEXTAREA Name=Debug Rows=5 Cols=80></TEXTAREA>
    </FORM>
    
    </BODY>
    </HTML>