以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 怎样赋予每条记录一个随机值? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=158039) |
-- 作者:cosogembird -- 发布时间:2020/11/5 17:43:00 -- 怎样赋予每条记录一个随机值? 大神您好: 表名:复习 列名:随机代码 现在我想给每一条记录的随机代码项赋值,使得每一条记录都有一个不同的随机代码 下面是我写的程序,弄好久不成样子,请大神们指点更正 Dim t As Table = Tables("练习")
For i As Integer = 0 To t.Rows.Count - 1
i=i+1
Dim Val1 As Integer = Rand.Next() \'生成一个随机整数
t.Row(i).("随机代码")=VALL
Next
|
-- 作者:有点蓝 -- 发布时间:2020/11/5 20:06:00 -- For i As Integer = 0 To t.Rows.Count - 1 t.Row(i)("随机代码")=Rand.Next() \'生成一个随机整数 Next
|
-- 作者:cosogembird -- 发布时间:2020/11/5 21:12:00 -- 换了个代码搞定了 |