vb编程中,我想使用随机函数产生10个在指定范围内的随机数,随机数的范围在文本框内输入确定。
我是对着课本编的呀,但总是显示有问题编码如下PrivateSubCommand1_Click()Randomizen=Val(Text1.Text)m=Val(Text2...
我是对着课本编的呀,但总是显示有问题
编码如下
Private Sub Command1_Click()
Randomize
n = Val(Text1.Text)
m = Val(Text2.Text)
For i = 1 To 10
p = p & int ((m+1-n)*rnd) +n&" "
Next i
Label1.Caption = p
End Sub 展开
编码如下
Private Sub Command1_Click()
Randomize
n = Val(Text1.Text)
m = Val(Text2.Text)
For i = 1 To 10
p = p & int ((m+1-n)*rnd) +n&" "
Next i
Label1.Caption = p
End Sub 展开
4个回答
展开全部
p = p & int ((m+1-n)*rnd+n) +n&" "
随机函数的应用:
int(rnd*(上线-下线+1)+下线)
随机函数的应用:
int(rnd*(上线-下线+1)+下线)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你不会是没有定义n ,m p吧
加一句
Dim n ,m as single ;p as string
加一句
Dim n ,m as single ;p as string
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
提示什么错误先说一下
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
p = p & int ((m+1-n)*rnd) + n & " "
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询