ch12-05-01.aspx
来自「这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助」· ASPX 代码 · 共 24 行
ASPX
24 行
<Html>
<Head>
<Title>Ch12-05-01.aspx System.Random类</Title>
</Head>
<Body>
<H2>System.Random类 - 产生随机数</H2>
<%
Dim RandNum As Random = New Random()
Dim byteValue(3) As Byte
Dim I As Integer
Response.Write("产生一个整数随机数:" & RandNum.Next() & "<BR>")
Response.Write("产生小于50的整数随机数:" & RandNum.Next(50) & "<BR>")
Response.Write("产生介于0~50之间的整数随机数:" & RandNum.Next(0,50) & "<BR>")
Response.Write("调用NextBytes(Byte())方法产生的随机数如下:<BR>")
RandNum.NextBytes(byteValue)
For I = 0 to 3
Response.Write("byteValue(" & I & ")的值为:" & byteValue(I) & "<BR>")
Next
Response.Write("产生介于0~1之间的随机数:" & RandNum.NextDouble())
%>
</Body>
</Html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?