...一个2位数,一个3位数,计算他们的平均值.VB程序设计
发布网友
发布时间：2025-01-04 23:32
共1个回答
热心网友
时间：2025-01-04 23:29
Private Sub Command1_Click()
Randomize
Dim i As Integer, j As Integer, k As Integer
i = Int(Rnd * 10) '0-9
j = Int(Rnd * 90) + 10 '0- +10 即为10-99
k = Int(Rnd * 900) + 10 '0-9 +100 即为100-999
Dim result As String
result = "(" & i & "," & j & "," & k & ")/3="
MsgBox result & (i + j + k) / 3
End Sub
