主题:VB绘制数学函数代码
singlion
[专家分:690] 发布于 2009-03-25 16:58:00
包括绘制直线、抛物线、双曲线、椭圆、正弦余弦、阿基米德螺线、摆线、星形线、笛卡尔叶形线、箕舍线、双曲螺线、四叶玫瑰线
回复列表 (共7个回复)
沙发
xjh22700 [专家分:320] 发布于 2009-03-26 16:41:00
做得很好,我以前也做过类似的程序,不过没你做得那么好!~
可惜生成EXE文件后只能画这些曲线了!功能受到很多限制!
所绘画的函数能不能由用户输入啊?
这个问题我一直关注中!
板凳
老大徒伤悲 [专家分:29120] 发布于 2009-03-27 08:52:00
1楼的问题实际不难。
无非是输入函数要遵循vb表达式的规定。
我曾经异想天开,要把表达式做成标准数学样式,结果费时三个月,无疾而终。
3 楼
xjh22700 [专家分:320] 发布于 2009-03-27 23:31:00
呵,呵!~!
最主要的问题是生成EXE文件后,当用户输入数学表达式时程序不认得这些表达式,它只认为这是字符串!要经过编译,程序才认得这些表达式,所以我也知道这是不好解决的,除非哪位高人有一些神奇的招数……
4 楼
老大徒伤悲 [专家分:29120] 发布于 2009-03-28 00:28:00
把“字符串”做表达式来计算,来论坛曾有过讨论。
Private Sub Command1_Click()
Dim X As String
X = inputbox("请输入符合vb标准的算式")
MsgBox X & "=" & RESULT(X)
End Sub
Function RESULT(ByVal X As String) As Double
Dim OBJ As Object
Set OBJ = CreateObject("MSScriptControl.ScriptControl")
OBJ.Language = "vbscript"
RESULT = OBJ.Eval(X)
Set OBJ = Nothing
End Function
这只是个示例。如果表达式中含有“变量”的话,可以在调用RESULT之前通过适当的方法赋值。
5 楼
xjh22700 [专家分:320] 发布于 2009-03-28 03:18:00
表达式中当然含有变量了,要不然画出来的图像就是一条水平直线了!~
能不能做一个通用的作图程序,可以作出一切"合法"的一元方程f(x)的图像?!
我在网上下载过一个数学函数作图器,能实现我的要求,就是不知他们是怎么做出来的!~
6 楼
lang12 [专家分:0] 发布于 2010-03-21 21:53:00
你好,我下了你的文件 ,但是运行不了,我是刚学vb画图的,你能介绍个方法怎么学嘛
7 楼
老大徒伤悲 [专家分:29120] 发布于 2010-03-25 08:33:00
[quote]表达式中当然含有变量了,要不然画出来的图像就是一条水平直线了!~
能不能做一个通用的作图程序,可以作出一切"合法"的一元方程f(x)的图像?!
我在网上下载过一个数学函数作图器,能实现我的要求,就是不知他们是怎么做出来的!~[/quote]
真不知道你是怎么想的?
难道算出一点得有了,不能算出多点来?
我来回复