三角函数化简 VB编程题:编写一个产生1至100之间的随机整数的Function过程?

VB编程题:编写一个产生1至100之间的随机整数的Function过程?RND函数在[0,1]范围内生成介于0和1之间的随机数,包括0,但不包括1。因此,要生成1到100之间的随机数,可以使用RND*

VB编程题:编写一个产生1至100之间的随机整数的Function过程?

RND函数在[0,1]范围内生成介于0和1之间的随机数,包括0,但不包括1。因此,要生成1到100之间的随机数,可以使用RND*98生成[0,98]之间的随机数,而int(RND*98)生成[0,97]之间的随机整数。然后int(RND*98)2生成[2,99]之间的随机整数,这满足了1到100之间随机数的目的。函数代码如下:public function sj()as integer randomize sj=int(RND*98)2 end function