作业帮 > 综合 > 作业

vb 编程 如何利用随机函数产生15个10到90的奇数组成的数列,并显示在标签中?要程序

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/25 11:32:46
vb 编程 如何利用随机函数产生15个10到90的奇数组成的数列,并显示在标签中?要程序
Private Sub Command1_Click()
Do
a = Int(Rnd * 81 + 10)
If a Mod 2 0 Then
Label1.Caption = Label1.Caption & a & ";"
n = n + 1
End If
If n = 15 Then Exit Do
Loop
End Su