📄 basic
字号:
WebBrowser1.ExecWB(6,1);
}
function mailto(){
document.mailto.email.value='';
var tmpText=prompt('请输入您朋友的EMail：',document.mailto.email.value);
if(tmpText){
document.mailto.email.value = tmpText;
document.mailto.submit();
}
}
// --></script>
<body bgcolor='#FFFFFF' leftmargin='0' topmargin='0' marginwidth='0' marginheight='0'>
<div align='center'>
<table width='770' border='0' cellspacing='0' cellpadding='0'>
<tr>
<td width='620' valign='top' align='center'>
<table width='620' border='0' cellspacing='0' cellpadding='0'>
<tr>
<td width='600' align='center' height='10' >
<div align='right'><a href='/' target='_blank'>CSDN</a>-<a href='/cnshare/' target='_blank'>软件频道</a>-<a href='/cnshare/shtm/108.shtm'>C/C++类</a></div>
</td>
</tr>
<tr>
<td width='600' align='center' height='30' class=title3><font size='3'>Basic语言解释器(1.0)</font></td>
</tr>
<tr>
<td align='center' height='2' >
<p><font color='#999999'> <font color='#000000'>作者:</font><a href=mailto:tangl_99@sohu.com>tangl_99</a> <font color='#000000'>网址:</font><a href=></a> <font color='#000000'>日期:</font>2002-8-15</font></p>
</td>
</tr>
<tr align='right'>
<td height='10' ><font color='#999999'><a href='../openfile.asp?kind=1&id=11283'><img src='../../image/rjpd_downlond.GIF' width='80' height='20' border='0'></a>
</font></td>
</tr>
<tr align='right'>
<td height='10' ><script src='../../viewed.asp?softid=13338'></script> <font color='#999999'>(<font color='#000000'>软件大小</font>:66k)</font></td>
</tr>
<tr>
<td align='center' height='10' ></td>
</tr>
<tr>
<td height='1' bgcolor='#999999'></td>
</tr>
<tr>
<td ></td>
</tr>
</table>
<table width='600' border='0' cellspacing='0' cellpadding='0'>
<tr>
<td height='20' > </td>
</tr>
<tr valign='top'>
<td width='600' class=tdmain><script src='/adv/soft_ad.asp'></script> Basic语言有许多版本,本软件是以Visual Basic的一些基础语法做成的Basic语言解释器.能够运行一般的Basic程序.<br>做此软件的目的不是为了做一个真正的Basic,而是给大家参考做语言解释方面的知识，所以我将它列入源程序列。<br>关于此Basic运行的手册说明如下:<br>//////////////////////////////////////<br>首先.<br>你直接<br>用tj filename就可以执行filename这个VB程序了<br>我在软件里加入了两个basic程序:demo.txt,demo2.txt<br>你可以在dos下输入:<br>tj demo.txt<br>或者<br>tj demp2.txt<br>来本Basic解释器来运行这两个basic程序<br><br><br>1.变量<br>本VB只支持整数变量Integer<br>譬如你可以 Dim A As Integer定义一个变量<br>2.本Basic还没有常量<br>3.语句<br>本VB支持IF Then<br>可以有if a>;;;;;;;b then<br> if a=b then<br> if a<;;;;;;;b then<br> 但是没有 if a<;;;;;;;=b 或 if a<;;;;;;;>;;;;;;;b if a>;;;;;;;=b<br>本VB支持 Do Until a<;;;;;;;b ... Loop<br> Do ... Loop While a<;;;;;;;b<br> 但是没有For Next(没有必要了)<br>4.过程<br>本VB支持自定义过程<br> 如Sub MySub (Dim a As Integer, Dim b As Integer...)<br> 可以直接在过程中代用另一过程<br>本VB不支持函数.<br>5.排错<br>虽然本VB有排错的功能,但是没有什么用，如果有你写的VB程序有错,请自己检查好了<br><br><br>由于本人没有学过《编译原理》所以做的不好,等我学完《编译原理》后再做个好的.<br><br>如果程序上有什么问题,请联系我:<br>tangl_99@sohu.com<br>QQ:8664220<br>////////////////////////////////////</td>
</tr>
</table>
<table width='620' border='0' cellspacing='0' cellpadding='0'>
<tr>
<td align='center' height='10' ></td>
</tr>
<tr align='right'>
<td ><a href='javascript:mailto()'><img src='../../image/v_email.GIF' width='100' height='23' border='0'></a>  <a href='javascript:print()'><img src='../../image/v_prinf.GIF' width='90' height='23' border='0'></a>  </td>
</tr>
<tr>
<td align='center' height='10' ></td>
</tr>
<tr>
<td height='1' bgcolor='#999999'></td>
</tr>
</table>
</td>
<td width='10' valign='top' align='center'> </td>
<td width='150' valign='top' align='center' class=td1>
<table width='150' border='0' cellspacing='0' cellpadding='0'>
<tr>
<td height='30'></td>
</tr>
<tr>
<td><img src='../../image/rjpd_downpager.GIF' width='150' height='20'></td>
</tr>
<tr>
<td>
<table width='150' border='0' cellspacing='0' cellpadding='0'>
<tr>
<td ></td>
<td height='10'></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/13/13535.shtm'>
XP风格复活节彩蛋的实现</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/13/13484.shtm'>
产生水纹、火焰及熔岩效果的示例源码</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/13/13596.shtm'>
ASP上载组件</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/13/13594.shtm'>
Cell(VC实现的类Excel简易电子表格)源码</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/13/13568.shtm'>
小型图形显示系统</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/10/10938.shtm'>
C/C++扩展函数库</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/13/13117.shtm'>
进程&线程查看器</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/13/13338.shtm'>
Basic语言解释器</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/11/11035.shtm'>
象棋</a></td>
</tr>
<tr>
<td valign='top'><img src='../../image/1d.gif' width='20' height='16'></td>
<td height='2'><a href='/cnshare/soft/13/13171.shtm'>
扫雷</a></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<form name='mailto' method='POST' action='/cnshare/mailto.asp'>
<input type='hidden' name='softid' value=13338>
<input type='hidden' name='softname' value=Basic语言解释器>
<input type='hidden' name='email' value=''></form>
</div>
</body>
<br>
<hr noshade size="1" width="770">
<table width="500" border="0" cellspacing="0" cellpadding="0">
<tr align="center">
<td height="10" valign="bottom" > <a href="http://www.csdn.net/intro/intro.asp?id=2">网站简介</a>
- <a href="http://www.csdn.net/intro/intro.asp?id=5">广告服务</a> - <a href="http://www.csdn.net/map/map.shtm">网站地图</a>
- <a href="http://www.csdn.net/help/help.asp">帮助信息</a> - <a href="http://www.csdn.net/intro/intro.asp?id=2">联系方式</a> - <a href="http://www.csdn.net/english">English</a>
</td>
<td align="center" rowspan="3"><a href="http://www.hd315.gov.cn/beian/view.asp?bianhao=010202001032100010"><img src="/images/biaoshi.gif" width="40" height="48" border="0"></a></td>
</tr>
<tr align="center">
<td valign="top" >百联美达美公司 版权所有 京ICP证020026号</td>
</tr>
<tr align="center">
<td valign="top" > <font face="Verdana">Copyright © CSDN.net, Inc.
All rights reserved</font></td>
</tr>
<tr>
<td height="15"></td>
<td></td>
</tr>
</table>
</div>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -