如何计算任意位数的随机数 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何计算任意位数的随机数

共有2656人关注过本帖树形打印复制链接主题：如何计算任意位数的随机数

yan2006l

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：431 积分：3214 威望：0 精华：2 注册：2011/9/10 21:35:00

Post By：2014/11/24 16:21:00 [显示全部帖子]

用rank生成0到（x-1）之间随机的一个数，另外一个数就x-去这个随机数

比如你是8 ，你用随机生成一个小于8的数，也许是3.那么另外一个就是5（8-3）

yan2006l

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：431 积分：3214 威望：0 精华：2 注册：2011/9/10 21:35:00

Post By：2014/11/24 16:26:00 [显示全部帖子]

Length

返回字符串的长度，不管是英文字符还是中文字符，在计算长度的时候都是1。

例如在命令窗口输入：

Dim s As String = "ABC中国DEF"
Output.show(s.Length)

执行之后，显示的结果为8。

再例如：

Dim s As String = "中国人"
For i As Integer = 0 To s.Length - 1
Output.Show(s.Chars(i))
Next

在命令执行上述代码后，会显示：

中
国
人

主题：如何计算任意位数的随机数