Visual Basic Rnd每次返回5

Question

已解决 此随机函数的目标是返回一个值,该值将用于将相应的行大写为该数字,我的问题是它每次都返回5,所以必须出错.任何人都可以解释我这个随机函数的错误吗？

编辑:我现在得到错误"randomize是一个类型,不能用作表达式".

这段代码: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.

Answer 1

每MSDN文档的Rnd,你需要调用Randomize首先创建一个新的种子.

此外,我不确定在您需要调用的函数之后命名模块是否是一个好主意.