
VB的问题~~~~~~~
我做个题目。。。我要做个随机的问题比如:我想把“我是菜鸟”这个字符串赋值给一个数字1,“他也是菜鸟”赋值给数字2,然后随机产生数字,如果数字是1,打印结果显示是“我是菜鸟...
我做个题目。。。我要做个随机的问题
比如:我想把“我是菜鸟”这个字符串赋值给一个数字1,“他也是菜鸟”赋值给数字2,然后随机产生数字,如果数字是1,打印结果显示是“我是菜鸟”,如果显示是2,打印结果是“他也是菜鸟”
怎么才能办到???
刚学VB不久,老鸟请指教 展开
比如:我想把“我是菜鸟”这个字符串赋值给一个数字1,“他也是菜鸟”赋值给数字2,然后随机产生数字,如果数字是1,打印结果显示是“我是菜鸟”,如果显示是2,打印结果是“他也是菜鸟”
怎么才能办到???
刚学VB不久,老鸟请指教 展开
3个回答
展开全部
最重要的是
用Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
这种格式返回lowerbound与upperbound之间的整数
Private Sub Command2_Click()
str1 = "我是菜鸟"
str2 = "他也是菜鸟"
Randomize
n = Int(Rnd * (2 - 1 + 1) + 1)
If n = 1 Then
Print str1
Else
Print str2
End If
End Sub
希望对你有所帮助
用Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
这种格式返回lowerbound与upperbound之间的整数
Private Sub Command2_Click()
str1 = "我是菜鸟"
str2 = "他也是菜鸟"
Randomize
n = Int(Rnd * (2 - 1 + 1) + 1)
If n = 1 Then
Print str1
Else
Print str2
End If
End Sub
希望对你有所帮助
展开全部
private command1_click()
dim x
x=int(rnd*2+1)
if x=1 then
print "我是菜鸟"
esle
print "他是菜鸟"
endif
end sub
dim x
x=int(rnd*2+1)
if x=1 then
print "我是菜鸟"
esle
print "他是菜鸟"
endif
end sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
我试了一下 怎么显示语法错误?(int x )
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询