tips10.asp

来自「Active Server Pages 网页制作教程看之前请传到ASP空间。或者」· ASP 代码 · 共 50 行

ASP
50 行
字号 
<!-- #include virtual="/kjasp/func/DB.fun" -->
<% mdbFile = "../UsersPwd.mdb" %>
<!-- #include file="../Login.asp" -->

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
   <TITLE>如何让使用者自行输入方程式，并且计算其结果？</TITLE>
   <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
   <META NAME="Author" CONTENT="KJ Wang">
   <META NAME="GENERATOR" CONTENT="Mozilla/3.01Gold (Win95; I) [Netscape]">
</HEAD>
<BODY BACKGROUND="backqa.jpg">

<H2 ALIGN=CENTER>如何让使用者自行输入方程式， 并且计算其结果？ 
<HR></H2>

<CENTER><P><IMG SRC="tip90.gif" HEIGHT=202 WIDTH=348></P></CENTER>

<BLOCKQUOTE>
<P>假设我们要像上图， 让使用者可以在「方程式」栏位中自由输入方程式， 然后利用程序加以计算，
则引用 ScriptControl 控件(注)最为方便， 假设被布置在表单上的 ScriptControl
控件其名称为 ScriptControl1， 则所撰写的程序将如下：</P>

<BLOCKQUOTE>
<PRE><FONT COLOR="#000080"><FONT SIZE=+1>Dim statement As String </FONT></FONT></PRE>

<PRE><FONT SIZE=+1><FONT COLOR="#000080">statement = &quot;X = &quot; &amp;</FONT><B><FONT COLOR="#FF0000"> Text1.Text </FONT></B><FONT COLOR="#000080">&amp; vbCrLf &amp; _ 
                   &quot;Y = &quot; &amp;</FONT><FONT COLOR="#FF0000"> <B>Text2.Text </B></FONT><FONT COLOR="#000080">&amp; vbCrLf &amp; _ 
                   &quot;MsgBox &quot;&quot;计算结果=&quot;&quot; &amp; Y&quot; </FONT></FONT></PRE>

<PRE><FONT SIZE=+1><FONT COLOR="#000080">ScriptControl1.</FONT><B><FONT COLOR="#0000FF">ExecuteStatement  </FONT></B><FONT COLOR="#000080">statement </FONT></FONT></PRE>
</BLOCKQUOTE>

<P><FONT COLOR="#008000">注：ScriptControl 控件附属于 VB 6.0， 如果安装之后没有看到这一控件，
可在光盘的 \Common\Tools\VB\Script 目录底下找这一控件， 其 .ocx 文件名称为
Msscript.ocx。</FONT></P>
</BLOCKQUOTE>

<P>
<HR></P>

<DIV ALIGN=right><P><A HREF="http://www.kj.com.tw" target="_top">学 VB(Visual
Basic) 找王国荣</A></P></DIV>

</BODY>
</HTML>

tips10.asp - 源码说明

本页面展示了「Active Server Pages 网页制作教程看之前请传到ASP空间。或者本地用iis。或安装pws内有说明」中的 tips10.asp 源码文件，采用 ASP 编程语言编写，共 50 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Active相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?