1个回答
展开全部
可以先随机生成一个70到90的整数，之后除以10即可。
While True
a = Int((21) * Rnd + 70)
If (a / 10) = (a \ 10) Then //条件判断，假如生成70，80等被10整除，则最后处理变为7.0，8.0
a = (CStr(a / 10) & ".0")
Else
a = CStr(a / 10)
End If
MessageBox a //a不是常数，而是字符串，如果想作为数字运算，要加上a=Clng(a)
Wend
While True
a = Int((21) * Rnd + 70)
If (a / 10) = (a \ 10) Then //条件判断，假如生成70，80等被10整除，则最后处理变为7.0，8.0
a = (CStr(a / 10) & ".0")
Else
a = CStr(a / 10)
End If
MessageBox a //a不是常数，而是字符串，如果想作为数字运算，要加上a=Clng(a)
Wend
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
