Foxtable(狐表)用户栏目专家坐堂 → [求助]数据型的集合add数据


  共有2151人关注过本帖树形打印复制链接

主题:[求助]数据型的集合add数据

帅哥哟,离线,有人找我吗?
shixu
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:31 积分:417 威望:0 精华:0 注册:2016/2/16 16:20:00
[求助]数据型的集合add数据  发帖心情 Post By:2016/3/4 10:00:00 [只看该作者]

数据型的集合add数据单元失败什么原因?

fys.add( sybj )

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/4 10:01:00 [只看该作者]

提示什么错误?贴出完整代码。


 回到顶部
帅哥哟,离线,有人找我吗?
shixu
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:31 积分:417 威望:0 精华:0 注册:2016/2/16 16:20:00
  发帖心情 Post By:2016/3/4 10:09:00 [只看该作者]

Dim drs As List(Of DataRow)
Dim fys As List(Of Double)

Dim bj As Double  = 10000
Dim ll As Double = .14/ 12
Dim qs As Integer = 24
Dim de As Double = (Pmt(ll, qs, bj, 0, 0))
Dim sybj As Double =bj
Output.Show(de)
For i As Integer = 0 To qs-1
    sybj = sybj*(1+ll)+de
    Output.Show(sybj)
    fys.add( sybj )
    'Output.Show(fys(i))
Next

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/4 10:10:00 [只看该作者]

Dim fys As new List(Of Double)

 回到顶部
帅哥哟,离线,有人找我吗?
shixu
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:31 积分:417 威望:0 精华:0 注册:2016/2/16 16:20:00
  发帖心情 Post By:2016/3/4 10:12:00 [只看该作者]

嗯,好了。谢谢。

 回到顶部