📄 tips10.htm
字号:
<!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 = "X = " &</FONT><B><FONT COLOR="#FF0000"> Text1.Text </FONT></B><FONT COLOR="#000080">& vbCrLf & _
"Y = " &</FONT><FONT COLOR="#FF0000"> <B>Text2.Text </B></FONT><FONT COLOR="#000080">& vbCrLf & _
"MsgBox ""计算结果="" & Y" </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>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -