作业帮 > 综合 > 作业

用VB编写程序:随机产生三个数,求出其中最小的那个数

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/29 08:22:22
用VB编写程序:随机产生三个数,求出其中最小的那个数
Private Sub Form_Click()
Dim i, min, n
Cls
For i = 1 To 3
Randomize
n = Int(Rnd * 100) + 1
Print n,
If i = 1 Then
min = n
Else
If min > n Then min = n
End If
Next
Print vbNewLine & "最小值:"; min
End Su