Foxtable(狐表)用户栏目专家坐堂 → 如何根据已知条件生成随机数?


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

主题:如何根据已知条件生成随机数?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108543 积分:552198 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/17 9:30:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108543 积分:552198 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/17 10:19:00 [显示全部帖子]

计算规则是什么?

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108543 积分:552198 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/17 10:42:00 [显示全部帖子]

请详细说明计算规则。我没有时间去反推您的公式

现在3楼的额代码计算结果是怎么样的?怎么样才是正确的结果?

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108543 积分:552198 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/17 11:26:00 [显示全部帖子]

这个意思?

Select Case e.DataCol.Name
    Case "上限", "下限"
for ia s integer = 1 to 15
dim r as row = tables("表B").addnew
        r("A") =  ((e.DataRow("中限") + Rand.Next(e.DataRow("下限"),e.DataRow("上限"))/11)+ (e.DataRow("中限") - Rand.Next(e.DataRow("下限"),e.DataRow("上限"))/11))/ 2
        r("B") = ((e.DataRow("中限") + Rand.Next(e.DataRow("下限"),e.DataRow("上限"))/11)+ (e.DataRow("中限") - Rand.Next(e.DataRow("下限"),e.DataRow("上限"))/11))/ 2
        r("C") = ...........
……
next
End Select

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108543 积分:552198 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/17 13:37:00 [显示全部帖子]

1、判断一个2个列都录入数据再处理
2、请认真看一下2楼帮助的说明和用法,这个生成的是整数,调用前把上下限乘于100,生成的随机值再除以100
3、帮助Rand类不可能会出现大于上下限的值,请认真测试

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108543 积分:552198 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/17 14:35:00 [显示全部帖子]

那是计算公式本身的问题,和随机函数没有任何关系

dim d1 as integer = Rand.Next(e.DataRow("下限"),e.DataRow("上限"))
msgbox(d1) 这个才是上下限之间的随机值
dim d2 as integer = Rand.Next(e.DataRow("下限"),e.DataRow("上限"))
msgbox(d2) 这个才是上下限之间的随机值

msgbox(((e.DataRow("中限") + d1/11)+ (e.DataRow("中限") - d2/11))/ 2)这个是单元格真正的值,如果这个值有问题,说明公式本身就有毛病

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:108543 积分:552198 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/11/17 16:06:00 [显示全部帖子]

我以为这个公式是您自己想出来的,原来自己都不知道是什么意思啊。 反正我是不知道的,特别不理解除以11是神马意思

 回到顶部