VBA编写一个程序，输出5个[20,80]的随机数

在VBA（Visual Basic for Applications）中，你可以创建一个简单的Sub过程来生成5个介于20到80之间的随机整数。以下是实现这一功能的一个示例：

Sub GenerateRandomNumbers()
    Dim randomArray() As Integer
    Dim i As Long

    ' 定义数组大小
    ReDim randomArray(1 To 5)

    ' 生成并添加随机数
    For i = LBound(randomArray) To UBound(randomArray)
        randomArray(i) = Int((80 - 20 + 1) * Rnd + 20) ' 使用Rnd函数生成[0,1)的随机数，然后乘以范围加偏移得到结果
    Next i

    ' 输出随机数
    Debug.Print "生成的5个随机数是："
    For Each num In randomArray
        Debug.Print num
    Next num
End Sub

这个程序会创建一个名为`randomArray`的数组，并使用For循环生成5个随机数，然后通过`Debug.Print`将它们打印出来。每次运行该程序，都会得到一组新的随机数。