用vb来求解切比雪夫多项式在某一点的函数值

VB 2020-02-04
Private Sub Command1_Click() [b]Dim T() As Integer Dim n%,x% n = Val(InputBox("输入序列数")) ReDim T(n) T(0) = 1 T(1) = x For n = 2 To n T(n) = 2 * x * T(n - 1) + T(n - 2) Next n For n = 0 To n - 1 Print T(n),If (n + 1) Mod 5 = 0 Then Print Next End Sub

相关文章

VB Format函数
Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
vb6/ASP FORMAT MM/DD/YYYY
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式，竟然没有好的办...
VB.net 捕获项目全局异常
在项目中添加如下代码：新建窗口来显示异常信息。 Namespace...
实现用VB.Net/(C#)开发K/3 BOS 插件的真正可行方法
转了这一篇文章，原来一直想用C#做k3的插件开发，vb没有C#用...
vb，wps，excel 分裂
Sub 分列() ‘以空格为分隔符，连续空格只算1个。对所选...
VB文件 hash 查看器
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...