易截截图软件、单文件、免安装、纯绿色、仅160KB

关于VB中的 rnd（）函数结果


rnd 的结果是 区间[ 0，1）  ，可以等于0， 而不会等于1， 对么？？

有人说可以等于0，有的说不行
Rnd 函数返回小于 1 但大于或等于 0 的值
要等于0就取整。
引用
rnd 的结果是 区间[ 0，1）  ，可以等于0， 而不会等于1， 对么？？

有人说可以等于0，有的说不行

[0,1)正确!

'原则上可以为0 , 但几率很小
Private Sub Command1_Click()
For I = 1 To 10000
Randomize
Debug.Print Rnd
Next
End Sub
'输出几个0?
引用
引用楼主 april_fool 的回复:
rnd 的结果是 区间[ 0，1）  ，可以等于0， 而不会等于1， 对么？？

有人说可以等于0，有的说不行

[0,1)正确!

这种问题也要动用代码解决啊
服了U
引用
'原则上可以为0 , 但几率很小
Private Sub Command1_Click()
For I = 1 To 10000
Randomize
Debug.Print Rnd
Next
End Sub
'输出几个0?

这是定义，毋庸质疑
rnd[0 1)只能取到0或0到1的数不能等于1
随机取了几个亿的数字，没有发现等于0和等于1的情况出现。
0到1之间的小数是无穷多个 几亿个不出现很正常
√
引用
0到1之间的小数是无穷多个 几亿个不出现很正常

[0,1)
其实就是一个浮点数去掉阶码。
�


相关问答：

asp.net(vb)问题

login.aspx.vb:

    Public ReadOnly Property nameT() As String
        Get
            Return TextBox1.Text
    &nb ......

VB中有无TApplication对应类型

我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好，用instance不是就可以了&# ......

vb写的程序编译后,运行若出错,如何知道到在哪一行?

vb写的程序编译后,运行若出错,如何知道到在哪一行?

按Ctrl+F5预编译，出错时会跳转到错误行

不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.

我编译后在我的电脑上运行没问题,但� ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号