此示例声明名为 ZooAnimals 的 String 对象的数组,填充它,然后反转其内容。
示例
Private Sub ReverseSortAnimals() Dim ZooAnimals(2) As String ZooAnimals(0) = "lion" ZooAnimals(1) = "turtle" ZooAnimals(2) = "ostrich" Array.Reverse(ZooAnimals) End Sub
编译代码
此示例需要:
- 对 System 命名空间的引用。