求用VB6编《凸极式同步发电机空载电压波形的预测计算》论文计算过程
要求用VB6.0或EXCEL2007编写，并提供原代码。具体内容见附件！ 龙版，你自己编一个嘛 yjhou 发表于 2012-11-13 09:45 static/image/common/back.gif
龙版，你自己编一个嘛
不会编积分函数呀，超版不想要500块大洋吗？ 本帖最后由 yjhou 于 2012-11-13 10:57 编辑
long98194 发表于 2012-11-13 09:46 static/image/common/back.gif
不会编积分函数呀，超版不想要500块大洋吗？
500大洋很吸引人的，要是用MATLAB我还行，VB咱不会啊。 积分函数不难编吧，牛顿-柯特斯公式，随便一本数值分析的书都会有，相信楼主能弄的出来的。 ghugyul 发表于 2012-11-13 11:19 static/image/common/back.gif
积分函数不难编吧，牛顿-柯特斯公式，随便一本数值分析的书都会有，相信楼主能弄的出来的。
不会编积分函数呀，你不想要500块大洋吗？ 我百度出来的仅供参考，500大洋还是等大家去拿
vb6.0怎样用辛普森法求积分
Private Function xinpusen(a As Single, b As Single, e As Single, he As Single) As Single
k = 2
s0 = 0
h = (b - a) / k
ya = hanshu(a)
yb = hanshu(b)
yi = hanshu(x = a + h)
p = ya + yb
d = yi
Do
s = (p + 4 * d) * h / 3
no = no + 1
If Abs(s - s0) <= e And h < he Then
xinpusen = s
Exit Function
Else
h = h / 2
k = k * 2
s0 = s
p = p + 2 * d
d = 0
For i = 1 To k - 1 Step 2
yi = hanshu(a + i * h)
d = d + yi
Next i
End If
Loop
End Function
需要参数：下限、上限、允许误差、最小划分宽度。
还需要自己协议各function，名字叫函数，一个参数，就是自变量，返回被积分函数的值 上传一下VB算法大全 龙哥还在么，我领取了可否，并随时升级改进。话说啥时候要啊 我来试试看吧 这干嘛的，真是军用的？ omig001 发表于 2012-11-18 21:56 static/image/common/back.gif
龙哥还在么，我领取了可否，并随时升级改进。话说啥时候要啊
可以呀！！！！！！！！！！！！！！！ long98194 发表于 2012-11-19 07:51 static/image/common/back.gif
可以呀！！！！！！！！！！！！！！！
抱歉，这两天有事耽搁了。现在程序主体基本写完了，之后关于数据有几个问题，有空沟通一下，要不没法和文章所给数据验证。 omig001 发表于 2012-11-22 11:52 static/image/common/back.gif
抱歉，这两天有事耽搁了。现在程序主体基本写完了，之后关于数据有几个问题，有空沟通一下，要不没法和文 ...
加我QQ吧，是滴有必要沟通一下，我也正想找你聊呢 不会把这么牛 omig001 发表于 2012-11-22 11:52 static/image/common/back.gif
抱歉，这两天有事耽搁了。现在程序主体基本写完了，之后关于数据有几个问题，有空沟通一下，要不没法和文 ...
进度如何？？？？？？？？？？？？？？？？？？？？？
页:
[1]