易截截图软件、单文件、免安装、纯绿色、仅160KB

vb做曲线,并拟合和进行高斯消去

大家好,我是新手,原来都用c和C#的,现在用vb编程,很多问题都不明白,希望能遇到高手,多多指教,下面是一个程序的拟合,和高斯消去。我大学学过离散数学,数值分析,就是不太记得了,希望能够提点一下,帮我解释一下,我比较笨,越详细越好,谢谢。
,Public Function CurveFitting(X() As Single, Y() As Single, n As Integer, e As Integer) As Single()

'**** 曲线拟合 ****
   
    Dim A() As Single
    Dim C() As Single
    Dim B() As Single
    ReDim A(1 To n + 1, 1 To n + 1) As Single
    ReDim C(1 To n + 1) As Single
    ReDim B(1 To n + 1) As Single
    Dim Temp As Single
    Dim i, j, K As Integer
   
    For i = 0 To e
        For j = 0 To e
            For K = 1 To n
                A(i + 1, j + 1) = A(i + 1, j + 1) + X(K) ^ (j + i)
            Next K
        Next j
       
        For K = 1 To n
            C(i + 1) = C(i + 1) + X(K) ^ i * Y(K)
        Next K
    Next i
   
    B = SolvingEquations(A(), C(), e + 1)
    <


相关问答:

求教下VB如何给D3D游戏写屏 - VB / API

想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】,效果就像游戏平台中一样,我试过在一窗口中写入文字,然后一直让窗口强制最前,虽然能实现文字显示,但是文字会不断闪烁,而且有不确定BUG,通过论坛搜 ......

【急求】VB中使用WScript调用外部命令 - VB / 基础类

在下是vb的新手,想写段程序,在vb中,使用wscript调用一些外部的命令,但是程序执行一直有错误,请各位高手帮忙解答下,谢谢。
代码如下:
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

关于VB.NET和MS ACCESS的问题

我写了一个软件,要用到ACCESS数据库,我再访问ACCESS的时候,我需要从表里读出一行数据,我的程序是这样写的,SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......

vb中如何实现对象属性的动态设置 - VB / 基础类

本人使用的是VB6.0版本
假设有一个对象A,A内有类型为B的对象属性。现在的问题是,需要添加若干个B对象作为A对象的属性。如,
 A.B1,A.B2,...
但具体添加多少个B对象作为A对象的属性则视具体情况不同而不同 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号