UPdata更新指定列为不同的随机小数

风的承诺　发表于：2020-07-27 09:27:02 　

复制

1.ZLower为下标，ZUpper为上标

2.ZValue为更新列，我现在生成的随机数都相同

3.希望生成每行的随机数不同，都在上下标范围内

1.ZLower为下标，ZUpper为上标

2.ZValue为更新列，我现在生成的随机数都相同

3.希望生成每行的随机数不同，都在上下标范围内

麻烦各位高手解惑一下，感谢！

Top

金宇发表于：2020-07-27 10:30:36

循环记录集，使用然后这个试试。 round(Rnd()*(0.156-0.108)+0.108,3)

Top

风的承诺发表于：2020-07-27 10:50:28

我现用的是UPDATA更新查询，也是用的这个函数round(Rnd()*(0.156-0.108)+0.108,3)，还是不行

Top

金宇发表于：2020-07-27 17:04:03

参考以下代码循环记录集更新。

    dim rst       as object
    Set rst = CreateObject("adodb.recordset")
    rst.Open "select * from 表名称", CurrentProject.Connection, 1, 3
    do while not rst.eof
        rst!ZValue=round(Rnd()*(0.156-0.108)+0.108,3)
        rst.update
        rst.movenext
    loop
    rst.close
    set rst=nothing

Top

风的承诺发表于：2020-07-27 17:39:00

rst.Open "select * from 表名称", CurrentProject.Connection, 1, 3

这一句运行不了

Top

金宇发表于：2020-07-28 08:27:13

"select * from 表名称" 表名称你需要替换你那里实际的表名称。

Top

风的承诺发表于：2020-07-28 10:30:14

改过成我的表名了，显示“至少有一个参数没有提定”

Top

总记录：6篇页次：1/1 9 1 :

Access交流中心

UPdata更新指定列为不同的随机小数