vb怎么找出数组中的最大值

要找出数组中的最大值，可以使用循环遍历数组，比较每个元素的大小，记录下最大的值。可以使用以下代码来实现：
```vb
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`即为数组中的最大值。