1

已解决 这个随机函数的目标是返回一个值，该值将用于将对应的行与该数字大写，我的问题是它每次都返回 5，所以一定有问题。谁能解释我在这个随机化功能上做错了什么？

编辑：我现在收到错误“随机化是一种类型，不能用作表达式”。

这里的代码：randomize 是一种类型，不能用作表达式。

 Module randomize
   Sub Main()

     Dim line As String = ""
     Dim linenum As Integer = 1
         Randomize()
     Dim random as Integer 
         random = CInt(Int((7 * Rnd()) + 1))

             'If linenum=random the line is capitalized.
4

2 回答 2

5

根据MSDN 文档，Rnd您需要先调用Randomize以创建新种子。

另外，我不确定在你需要调用的函数之后命名你的模块是否是个好主意。

于 2012-10-17T17:48:28.153 回答
1

尝试这个：-

 Dim x As Integer
 Randomize()
 x = CInt(Int((7 * Rnd()) + 1))
于 2012-10-17T17:50:29.157 回答