要找出数组中的最大值,可以使用循环遍历数组,比较每个元素的大小,记录下最大的值。可以使用以下代码来实现:
Dim array() As Integer = {1, 2, 3, 4, 5}
Dim max As Integer = array(0)
For i As Integer = 1 To array.Length - 1
If array(i) > max Then
max = array(i)
End If
Next
Console.WriteLine("数组中的最大值为:" & max)
在上述代码中,首先定义了一个整型数组array
,然后初始化了一个变量max
为数组的第一个元素array(0)
。然后通过循环遍历数组,从第二个元素开始,依次与max
比较,如果当前元素大于max
,则将当前元素赋值给max
。最后输出max
即为数组中的最大值。